Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustite program Microsoft Office Excel , kliknite na kartu " Vývojár " a zadajte " späť " v " B1 " . Kliknite na " Visual Basic " pre spustenie v okne editora VBA .
2
Vytvoriť nový postup zadaním nasledujúci text :
Private Sub undoBOneText ( )
3
skopírujte a vložte nasledujúci kód späť na text zadaný v " B1 " a nahradiť ju " Enter Text " nasledovne : ..
S Application.EnableEvents = False.Undo.EnableEvents = TrueEnd WithRange ( " B1 " ) SelectRange ( " B1 " ) hodnota = " Zadajte text : " End Sub
4
Stlačte " F5 " pre spustenie procedúry
.
Copyright © počítačové znalosti Všetky práva vyhradené