makro w Excelu

kasiam1312
Użytkownik
Użytkownik
Posty: 8
Rejestracja: 11 wrz 2008, o 20:12
Płeć: Kobieta
Lokalizacja: Katowice

makro w Excelu

Post autor: kasiam1312 »

mam napisać makro, które scalałoby niepuste komórki na dowolnym obszarze i nie wiem jak sie za to zabrać, mam coś takiego dla pierwszej kolumny:

Dim i, j, K As Long
K = Selection.Rows.Count
j = 1
For i = 1 To K
If Cells(i, 1) "" Then
If i j Then
Cells(j, 1) = Cells(i, 1)
Cells(i, 1) = ""

End If
j = j + 1

End If
Next i


i teraz nie wiem jak to mam zmienić, czy ktoś może wie o co tu chodzi, jak zrobic żeby takie podobne makro działało na dowolnie zaznaczonym obszarze?
ODPOWIEDZ