GoldenLine
Zaloguj się
Tomasz K.

Tomasz K. Każdy z nas powinien
zdać w życiu egzamin
z bycia człowie...

Temat: Makro, a komórka aktywna

Witajcie. Mam makro, które wstawia daty od .. do.. Data początkowa jest w komórce A1, data końcowa w A2. Makro odwołuje się do tych komórek. Makro działa od wybranej komórki aktywnej. Wszystko działa, ale chciałbym żeby użytkownik nie używał wykonywał makra, kiedy przypadkiem kursor będzie w komórkach a1 lub a2. Użyłem struktury If.. Then, .. coś nie działa,

Set zakres = Range("a1:a2")
If ActiveCell = zakres Then MsgBox "Ustaw kursor w innej komórce"
Else

Dalsza część kodu

end if
end sub

Błąd wskazuje na "Else". Próbowałem różnych sposobów, nie wiem gdzie robię błąd.
Link do wypowiedziLink
Sławomir Broda

Sławomir Broda VBA, Excel, Access,
SAP i wszystko
związane z
automatyzac...

Temat: Makro, a komórka aktywna

Tomasz K.:
Witajcie. Mam makro, które wstawia daty od .. do.. Data początkowa jest w komórce A1, data końcowa w A2. Makro odwołuje się do tych komórek. Makro działa od wybranej komórki aktywnej. Wszystko działa, ale chciałbym żeby użytkownik nie używał wykonywał makra, kiedy przypadkiem kursor będzie w komórkach a1 lub a2. Użyłem struktury If.. Then, .. coś nie działa,

Set zakres = Range("a1:a2")
If ActiveCell = zakres Then MsgBox "Ustaw kursor w innej komórce"
Else

Dalsza część kodu

end if
end sub

Błąd wskazuje na "Else". Próbowałem różnych sposobów, nie wiem gdzie robię błąd.
Enter przed msgbox :).
Link do wypowiedziLink
Tomasz K.

Tomasz K. Każdy z nas powinien
zdać w życiu egzamin
z bycia człowie...

Temat: Makro, a komórka aktywna

Witam Panie Sławku. Kto by wiedział o takim szczególe. Z tym jest OK, ale na przypisaniu warunku się wykłada coś jest nie tak
Activecell = zakres
myślę że aktywna komórka nie może być zakresem, ale kiedy w warunku zapiszę Activecell="a1" i ustawię kursor w "A1", to warunek jakby nie działał, nie wyświetla powiadomienia, a cały kod wykonywany jest dalej.
Link do wypowiedziLink
Sławomir Broda

Sławomir Broda VBA, Excel, Access,
SAP i wszystko
związane z
automatyzac...

Temat: Makro, a komórka aktywna

Tomasz K.:
Witam Panie Sławku. Kto by wiedział o takim szczególe. Z tym
No nie każdy. Wersji składni if'ów jest 4, a tu pomieszały się 2.
jest OK, ale na przypisaniu warunku się wykłada coś jest nie tak
Activecell = zakres
myślę że aktywna komórka nie może być zakresem, ale kiedy w warunku zapiszę Activecell="a1" i ustawię kursor w "A1", to warunek jakby nie działał, nie wyświetla powiadomienia, a cały kod wykonywany jest dalej.
Bo trzeba sprawdzić, czy jeden zakres zawiera się w drugim.
If intersect(activecell, zakres) then
Link do wypowiedziLink
Tomasz K.

Tomasz K. Każdy z nas powinien
zdać w życiu egzamin
z bycia człowie...

Temat: Makro, a komórka aktywna

Dzięki, działa tak jak chciałem.
Link do wypowiedziLink
« Wróć do tematów
Odpowiedz

Podobne tematy


Następna dyskusja:

migająca komórka




Wyślij zaproszenie do
Anuluj