Excel z obsługą makr - błąd 1004

Question

Dzień dobry,

Od piątku mam problem z moim arkuszem kalkulacyjnym z włączoną obsługą makr - po kliknięciu dwa razy w pole pojawia mi się błąd z załącznika, a po wejściu w opcję debug pojawia się takie okno - również załączony screenshot. Program był reinstalowany, ale to nie pomogło. Potrzebuję pracować na działającym programie, a już nie mamy pomysłu jak to naprawić.

Answer 1

Ta odpowiedź została przetłumaczona automatycznie. W związku z tym mogą wystąpić błędy gramatyczne lub dziwne sformułowania.

Witaj Błażej,

Witamy w społeczności firmy Microsoft.

Wygląda na to, że napotykasz błąd wykonania "1004": Metoda obiektu "_Worksheet" "Zakres" nie powiodła się w makrze programu Excel. Ten błąd zwykle występuje, gdy występuje problem ze sposobem, w jaki zakres jest przywoływany w kodzie VBA.

Możliwe problemy i poprawki

1. ComboBox1_Change: (Chociaż drugi obraz pokazuje, że może nie być problemu technicznego z tą częścią kodu, nadal możesz chcieć go potwierdzić).
   • Upewnij się, że arkusz "Lista" istnieje i że zakres "D4:D299" jest poprawnie określony.
   • Sprawdź, czy COMBOBOX1 poprawnie odwołuje się do formularza i czy istnieje w formularzu.
2. Worksheet_BeforeDoubleClick:
   • Upewnij się, że nazwany zakres "Wprowadź tutaj" istnieje w arkuszu.
   • Sprawdź, czy USERFORM1 jest poprawnie zdefiniowany i może zostać wyświetlony.

Kroki debugowania

1. Sprawdź następujące zakresy:
   • Upewnij się, że opcja "Wprowadź tutaj" jest zdefiniowana w arkuszu kalkulacyjnym. Możesz to sprawdzić, przechodząc do Menedżera nazw formuł > w programie Excel.
2. Aktywuj arkusz:
   • Przed odwołaniem się do zakresu aktywuj arkusz: Worksheets("SheetName").Activate Set Rng = Worksheets("SheetName").Range("TuWpisuj")
3. Wydrukuj informacje debugowania:
   • Dodaj instrukcje, aby sprawdzić wartości zmiennych: Debug.Print Target.Address
4. Obsługa błędów:
   • Dodaj obsługę błędów, aby wyłapywać i debugować błędy: On Error Resume Next ' Your code here On Error GoTo 0

Spróbuj wykonać te czynności i sprawdź, czy pomogą one rozwiązać problem. Jeśli problem będzie się powtarzał, podaj więcej szczegółów na temat konkretnego wiersza powodującego błąd, lepiej udostępnij nam swój plik w celu pełnego testu (jeśli jest to wygodne).

Pozdrawiam

William.Y | Specjalista ds. pomocy technicznej społeczności Microsoft

Answer 2

To jest forum, wiec możesz załączyć tutaj link do OneDrv i może ktoś będzie wstanie ci sprawdzić materiał.

Postaraj się jednak skonfrontować to na innym komputerze, sam. Uruchom debuga, sprawdź czy adres target jest właściwy, czy masz zadeklarowaną nazwę w skoroszycie i spróbuj ją przypisać w innym kodzie.

Ja zaraz jade w trasę i z pewnością nie będę miał na to czasu, ale może ktoś inny się tym zainteresuje.

Pozdrawiam.

Answer 3

Brak błędów#ADR żądna z podpowiedzi nie pomaga, w jaki sposób mogę wysłać arkusz?

Answer 4

Zakres operaty na nazwie wyleciał w powietrze.

Nie masz w danym pliku takiej nazwy "TuWpisuj", albo został zniszczony i w menadżerze masz #ADR i należy je ponownie wyliczyć i założyć, albo odwołać się nie do nazwy ale do zakresu bezpośrednio

Po wykonaniu tej czynności zamknij post zaznaczać prawidłową odpowiedź.

Pozdrawiam.