Keisti darbalapį iš kodo? Pridėkite langelio komentarą, kad vartotojas žinotų, ką ką tik padarėte! Šie kodo fragmentai parodo, kaip pridėti arba ištrinti komentarą langelyje.
Pridėkite langelio komentarą naudodami VBA
1. Įdėkite šį kodą kur nors makrokomandoje, kad pridėtumėte komentarą
| 1 | Sheet1.Range ("A1"). AddComment ("Hello World") |
Ištrinkite langelio komentarą naudodami VBA
2. Norėdami ištrinti komentarą, naudokite šį kodą
| 1 | Sheet1.Range ("A1"). Comment.Delete |
Redaguokite langelio komentarą naudodami VBA
3. Norėdami redaguoti komentarą, turite perskaityti esamą ir jį redaguoti. Naudokite žemiau esantį kodą
| 123456789 | Dim OldComment As Variant„Dim NewComment As Variant“OldComment = Sheet1.Range ("A1"). Comment.TextNewComment = OldComment & "Redaguotas komentaras"Sheet1.Range ("A1"). Comment.DeleteSheet1.Range ("A1"). AddComment (NewComment) |
Pirmiausia turite perskaityti esamą komentarą „OldComment“ kintamasis.
Po to galite redaguoti komentarą, pvz. pridėti naują tekstą prie esamo NewComment kintamasis.
Dabar reikia ištrinti seną komentarą ir pridėti naują. Norėdami ištrinti komentarą, turite naudoti .Komentuoti. Ištrinti komandą.
Galiausiai galite pridėti komentarą iš NewComment kintamasis naudojant .AddComent komandą.
