brisanje celic

Pomoč pri izdelavi makrov
Odgovori
tjasa
Prispevkov: 5
Pridružen: Po Feb 16, 2009 6:00 pm

brisanje celic

Odgovor Napisal/-a tjasa »

heelo :)

moje vprašanje se bo marsikomu zdelo sila lahko,pa vendar sama tega
ne znam rešiti.kako bi brisala celice z makrom:

1.primer:

briši celice za 10 mest navzdol od aktivne celice

2.primer:

briši celice za 10 mest desno od aktivne celice.

vašega odgovora se veselim.

lp :wink:
cedra
Prispevkov: 264
Pridružen: Po Jul 25, 2005 11:11 pm
Kraj: Kamnik

Odgovor Napisal/-a cedra »

Makro za čiščenje vsebine celic kot jih želite:

Koda: Izberi vse

Sub Brisi_dol()
     Range(Selection, Selection.Offset(10, 0)).Select
    Selection.ClearContents
End Sub

Koda: Izberi vse

Sub Brisi_desno()
     Range(Selection, Selection.Offset(0, 10)).Select
    Selection.ClearContents
End Sub

Koda: Izberi vse

Sub Brisi_gor()
     Range(Selection, Selection.Offset(-10, 0)).Select
    Selection.ClearContents
End Sub

Koda: Izberi vse

Sub Brisi_levo()
     Range(Selection, Selection.Offset(0, -10)).Select
    Selection.ClearContents
End Sub
Upam, da je to to :)
lp,

cedra
AndrejL
Prispevkov: 25
Pridružen: Po Nov 10, 2008 9:22 pm

Odgovor Napisal/-a AndrejL »

Sub BrisiDol()

Range(ActiveCell, ActiveCell.Offset(9, 0)).ClearContents
End Sub

...in...

Sub BrisiDesno()

Range(ActiveCell, ActiveCell.Offset(0, 9)).ClearContents

End Sub
tjasa
Prispevkov: 5
Pridružen: Po Feb 16, 2009 6:00 pm

Odgovor Napisal/-a tjasa »

pozdravljeni :D

o koliko rešitev,poskusila bom prav vse.
obema se zahvaljujem.
čao :wink:
Odgovori