sandi70
26.04.12,11:15
Čaute!!!
Vie mi niekto napísať kód pre vymazanie?
Napr. Mám v bunkách A1 až D10 určité slová a chcem to jedným kliknutím na button vymazať.
Ak je niekto taký dobrý Ďakujem!!!
Vie mi niekto napísať kód pre vymazanie?
Napr. Mám v bunkách A1 až D10 určité slová a chcem to jedným kliknutím na button vymazať.
Ak je niekto taký dobrý Ďakujem!!!
zk24
26.04.12,09:49
Sub Delete_button()
Range("A1 : D10").ClearContents
End Sub
akurát ze ten range v zátvorke má byť bez medzier, ale kedže je tam ":" a "D" tak mi to prepisovalo na ":D"...
Range("A1 : D10").ClearContents
End Sub
akurát ze ten range v zátvorke má byť bez medzier, ale kedže je tam ":" a "D" tak mi to prepisovalo na ":D"...
sandi70
26.04.12,17:05
Zadal som to takto:
Private Sub CommandButton1_Click()
Sub Delete_button()
Range("A1 : D10").ClearContent
End Sub
a nefunguje to... to range som dal bez medzier
Private Sub CommandButton1_Click()
Sub Delete_button()
Range("A1 : D10").ClearContent
End Sub
a nefunguje to... to range som dal bez medzier
monchi
26.04.12,17:30
Chyba ti tam "s" na konci
nie Range("A1 : D10").ClearContent ale Range("A1 : D10").ClearContents
/M
nie Range("A1 : D10").ClearContent ale Range("A1 : D10").ClearContents
/M
zk24
27.04.12,07:30
Ešte ma napadá, že ak ide o takéto jednoduché makrá, tak je jednoduchšie si možno to makro nahrať. Dať "record Macro", vykonať akciu akú chcete, uložiť makro a ked máte pridaný "button" tak iba right-click a "assign macro", ak by ste to teda nevedeli spojazdniť.