Temat: Makro usuwające liczby z ułamkiem

Witam!

Piszę z problemem, który najprawdopodobniej jest bardzo prosty w rozwiązaniu, ale który sprawia mi trudność. Otóż próbuję napisać makro, które po uruchomieniu będzie sprawdzać wszystkie komórki w kolumnie A i jeśli w którejś komórce wykryje liczbę z przecinkiem, usunie cały wiersz. Mam część usuwającą wiersze, przesuwającą zaznaczenie, ale nie wiem jak powinien wyglądać warunek sprawdzający czy liczba posiada ułamek.

Z góry dziękuję za każdą odpowiedź,
PozdrawiamTen post został edytowany przez Autora dnia 16.09.20 o godzinie 13:51
Oskar Shon

Oskar Shon Dodatki do Office
www.VBATools.pl

Temat: Makro usuwające liczby z ułamkiem

Jak wspomniałem na grupie FB, ale skoro sie tutaj temat również pojawił przypomnę dla zainteresowanych.

Warunek jakim można sprawdzić liczby całkowite:
val(liczba) = liczba albo
liczba\1 = liczba albo
WorksheetFunction.Round(liczba, 0) = liczba albo
CInt(liczba) = liczba


Pozdrawiam.

Obrazek

Temat: Makro usuwające liczby z ułamkiem

Napisałem to samo pytanie w dwóch miejscach jednocześnie. Nie sądziłem, że tutaj też Pana znajdę :)

Pozdrawiam



Wyślij zaproszenie do