Mój klient otrzymuje błąd kompilacji; Nie można znaleźć projektu lub biblioteki na jego wersji programu Excel 2010, jednak nie otrzymuję tego w mojej wersji 2010. Jak mogę dostosować ten kod, aby się nie pojawił. Gdy pojawi się błąd w następującym kodzie tekst „komórkę” w „dla każdej komórki w selekcji” jest podświetlony:Otrzymuję komunikat "Błąd kompilacji: Nie można znaleźć projektu lub biblioteki" tylko w niektórych wersjach programu Excel 2010. Trudne do przetestowania tego
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$9" Then
Columns("D:CB").Select
Selection.EntireColumn.Hidden = False
Application.ScreenUpdating = False
Sheet17.Range("E48:CB48").Select
For Each cell In Selection
If cell = 0 Then
Range(cell.Address).EntireColumn.Hidden = True
End If
Next
Application.ScreenUpdating = True
Sheet17.Range("b9").Select
End If
End Sub`
Mój klient jest także zgłaszania błędów w poniższym kodzie ze słowem „odpowiedź” jest podświetlony . To również nie jest problemem dla mnie, w mojej wersji programu Excel 2010. Każda pomoc jest bardzo doceniana.
If Sheet1.Range("E18") = 3 Then
Response = MsgBox("Reminder Emails have been set to be sent automatically at " & Sheet1.Range("f18").Value & ", " & Sheet1.Range("Q4").Value & " day(s) before" & vbCrLf & "the scheduled appointment. Do you want to send reminder e-mails now anyway?", vbYesNo)
If Response = vbNo Then
Exit Sub
End If
End If
Używasz 'Response' do przechowywania długiej zmiennej, więc nie powinno to powodować błędu (chyba że' Response' jest częścią modelu obiektowego odniesienia biblioteki - zgadnij). Używałbym 'lngResponse' dla nazwy i wymiaru tak długo. – brettdj
Może to być identyczne z: http://stackoverflow.com/questions/507191/cant-find-project-lub-library-for-standard-vba-functions – Smandoli
OK, spróbuję. Ponieważ na moim komputerze wszystkie te opcje działają dobrze, muszę czekać na opinie klientów, co jest nieco frustrujące. Jeszcze raz bardzo dziękuję – ExcelForFreelancers