Kaip naudoti komentarų parinktį per VBA

Anonim

Šiame straipsnyje mes išmoksime naudoti komentarų parinktį „Microsoft Excel“ per VBA.

Komentaras yra šaltinis, kuriuo mes galime perduoti pranešimą kiekvienam vartotojui, jei jis turi pateikti informaciją apie bet kurią konkrečią ląstelę.

Mes išmoksime:-

  • Kaip įterpti komentarą?
  • Kaip ištrinti visus komentarus?
  • Kaip ištrinti visus komentarus iš visų lapų į darbaknygę?
  • Kaip iš dalies paslėpti komentarus?
  • Kaip visiškai paslėpti komentarus?
  • Kaip parodyti vieną komentarą?
  • Kaip matyti arba parodyti visus komentarus visoje „Excel“ darbaknygėje?
  • Slėpti konkrečius komentarus „Excel“- komentarai vis tiek bus rodomi.
  • Kaip pridėti fono nuotraukų/vaizdų komentarą „Excel“?

Dabar pradėkite nuo to, kaip įterpti komentarą į „Excel“ lapą?

Paimkime pavyzdį, kad suprastume, kaip galime įterpti komentarus į „Excel“ lapą.

2 lape turime duomenis, kuriuose nurodome kiekvieno darbuotojo įėjimo ir išvykimo laiką, taip pat lape įrašėme darbo valandas, viršvalandžius ir įprastas valandas. Kai kuriose ląstelėse norime įterpti komentarus.

Norėdami pridėti komentarus lape, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.

Parašykite žemiau nurodytą kodą:

Papildomas komentaras ()
Dim sh kaip darbalapis
Nustatykite sh = ThisWorkbook.Sheets (1)
sh.Range ("E10"). AddComment ("Šeštadienis išjungtas")
sh.Range ("D12"). AddComment ("Bendras darbo laikas - įprastos valandos")
sh.Range ("I12"). AddComment ("8 valandos per dieną, padaugintos iš 5 darbo dienų")
sh.Range ("M12"). AddComment ("Bendras darbo laikas nuo 2014 m. liepos 21 d. iki 2014 m. liepos 26 d.")
Pabaiga Sub

Kodo paaiškinimas:- Pirmiausia turime pasirinkti temos pavadinimą, tada mes nustatysime kintamuosius ir tada nustatysime visus diapazonus, kuriuose norime pateikti komentarus.
Norėdami paleisti makrokomandą, paspauskite klaviatūros klavišą F5. Visi komentarai bus atnaujinti „Excel“ lape. Komentarus galite identifikuoti raudonu stačiakampiu langelių kampe.

Kaip ištrinti visus komentarus iš lapo?

Paimkime pavyzdį, kad suprastume, kaip galime ištrinti visus „Excel“ lapo komentarus.

2 lape turime duomenis, kuriuose nurodome kiekvieno darbuotojo įėjimo ir išvykimo laiką, taip pat į lapą įrašėme darbo valandas, viršvalandžius ir įprastas valandas. „Excel“ turime keletą komentarų, kuriuos norime ištrinti.

Norėdami ištrinti visus lapo komentarus, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:
Sub DeleteComment ()
Ląstelės. Išvalyti
Pabaiga Sub

Kaip ištrinti visus komentarus iš visų darbaknygės langelių?

Paimkime pavyzdį, kad suprastume, kaip galime ištrinti visus „Excel“ lapo komentarus.

Turime duomenis dviejuose lapuose, kuriuose turime kiekvieno darbuotojo įėjimo ir išvykimo laiką, taip pat į lapą įrašėme darbo valandas, viršvalandžius ir įprastas valandas. „Excel“ turime keletą komentarų, kuriuos norime ištrinti ne tik iš aktyvaus lapo, net ir iš darbaknygės.

Norėdami ištrinti visus komentarus iš visų darbaknygės darbalapių, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:
Sub DeleteAllComments ()
Dim wsh kaip darbalapis
Dim CmtAs CommentFor Kiekvienas wsh „ActiveWorkbook.Worksheets“
Už kiekvieną Cmt In wsh. Komentarai
Cmt. Ištrinti
Kitas
Kitas
Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia turime pasirinkti temos pavadinimą, tada paleisime ciklą, kad patikrintume lapus, tada ištrinsime visus komentarus iš visų lapų.

Norėdami paleisti makrokomandą, paspauskite klaviatūros klavišą F5. Visi komentarai bus ištrinti iš visų darbaknygės lapų.

Kaip iš dalies paslėpti komentarus?

Paimkime pavyzdį, kad suprastume, kaip galime iš dalies paslėpti komentarus.

Turime duomenis dviejuose lapuose, kuriuose nurodome kiekvieno darbuotojo įėjimo ir išvykimo laiką, taip pat lape įrašėme darbo valandas, viršvalandžius ir įprastas valandas. „Excel“ turime keletą komentarų, kuriuos norime paslėpti.

Norėdami paslėpti komentarus iš visų darbalapių, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:
Po paslėptiKomentarai ()
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia nurodysime temos pavadinimą, tada nustatysime kodą, kuriuo paslėpsime komentarus.
Norėdami paleisti makrokomandą, paspauskite klaviatūros klavišą F5. Visi komentarai bus ištrinti iš visų lapų į darbo knygą.

Kaip visiškai paslėpti komentarus?

Paimkime pavyzdį, kad suprastume, kaip galime visiškai paslėpti komentarus.

Turime duomenis dviejuose lapuose, kuriuose turime kiekvieno darbuotojo įėjimo ir išvykimo laiką, taip pat į lapą įrašėme darbo valandas, viršvalandžius ir įprastas valandas. „Excel“ turime keletą komentarų, kuriuos norime visiškai paslėpti. Tai reiškia, kad komentarai turėtų būti, bet jie neturėtų būti rodomi niekam, tik vartotojas galės redaguoti komentarą. Todėl tai nėra saugus būdas visiškai apsaugoti vartotojo komentarus.

Norėdami visiškai paslėpti komentarus, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:
Paslėpti komentarus visiškai ()
Application.DisplayCommentIndicator = xlNoIndicator
Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia turime pasirinkti temos pavadinimą, o tada mes turime apibrėžti kodą, kad paslėptume komentarus.
Norėdami paleisti makrokomandą, paspauskite klaviatūros klavišą F5. Visi komentarai bus visiškai paslėpti „Excel“ darbalapyje.

Kaip parodyti vieną komentarą ir jis turėtų būti visada matomas?

Makrokomanda naudojama tam tikriems svarbiems komentarams rodyti „Excel“ darbalapyje ar darbaknygėje.

Paimkime pavyzdį, kad suprastume, kaip galime parodyti vieną komentarą „Excel“.

Turime duomenis dviejuose lapuose, kuriuose nurodome kiekvieno darbuotojo įėjimo ir išvykimo laiką, taip pat lape įrašėme darbo valandas, viršvalandžius ir įprastas valandas. „Excel“ turime keletą komentarų, kuriuos norime parodyti viename komentare iš N skaičių komentaro.

Norėdami parodyti vieną komentarą, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
    • Parašykite žemiau nurodytą kodą:
Papildomas komentaras ()
Dim sh kaip darbalapis
Nustatykite sh = ThisWorkbook.Sheets (1)
sh.Range ("E10"). Komentaras.Matomas = tiesa
Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia nusprendžiame temos pavadinimą, o tada turime apibrėžti kodą, kad darbalapyje būtų rodomas vienas komentaras.
Norėdami paleisti makrokomandą, paspauskite klaviatūros klavišą F5. Bus rodomas tik vienas komentaras, o kiti komentarai liks paslėpti.

Kaip parodyti visus komentarus visoje „Excel“ darbaknygėje?

Tai naudinga, kai iš kažko gauname bet kokią darbaknygę ir nežinome, kurioje ląstelėje yra komentarų darbaknygėje, todėl galime naudoti šį VBA kodą, kad būtų rodomi visi darbo knygos komentarai.

Paimkime pavyzdį, kad suprastume, kaip galime parodyti visus komentarus visoje „Excel“ darbaknygėje.

Turime duomenis dviejuose lapuose, kuriuose nurodome kiekvieno darbuotojo įėjimo ir išvykimo laiką, taip pat įrašėme darbo valandas, viršvalandžius ir įprastas valandas lape su keliais komentarais. Tačiau visi komentarai yra paslėpti ir mes norime matyti visus paslėptus komentarus.

Norėdami parodyti vieną komentarą, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:
Sub ShowAllComments ()
Application.DisplayCommentIndicator = xlCommentAndIndicator
Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia turime nuspręsti dėl temos pavadinimo, o tada turime apibrėžti kodą, kad būtų rodomi visi darbalapio komentarai.
Norėdami paleisti makrokomandą, paspauskite klaviatūros klavišą F5. Visi komentarai bus rodomi „Excel“ lape.

  • Slėpti konkrečius komentarus „Excel“- komentarai vis tiek bus rodomi.

Kaip paslėpti konkretų komentarą „Excel“?

Tai naudinga paslėpti kelis komentarus, kurių nenorime visiems rodyti duomenyse.

Paimkime pavyzdį, kad suprastume, kaip galime paslėpti tam tikrus komentarus visoje „Excel“ darbaknygėje.

Turime duomenis dviejuose lapuose, kuriuose nurodome kiekvieno darbuotojo įėjimo ir išvykimo laiką, taip pat lape įrašėme darbo valandas, viršvalandžius ir įprastas valandas.

Norėdami paslėpti kai kuriuos konkrečius komentarus, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:
Po paslėptiSpecificComments ()
Dim sh kaip darbalapis
Nustatykite sh = ThisWorkbook.Sheets (1)
sh.Range ("E10"). Komentaras.Matomas = Netiesa
sh.Range ("D12"). Komentaras.Visible = Netiesa
Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia turime nuspręsti dalyko pavadinimą ir tada apibrėžti diapazonus, kurių norime nematyti.
Norėdami paleisti makrokomandą, paspauskite klaviatūros klavišą F5. Bus rodomi tik 2 komentarai iš 4.

  • Kaip pridėti fono nuotraukų/vaizdų komentarą „Excel“?

Kaip komentarų laukelyje pridėti nuotraukų ar vaizdų foną?

Ši makrokomanda bus naudojama nuotraukoms ar vaizdams fone nustatyti komentarų laukelyje iš kompiuterio. Dėl to komentarai ir „Excel“ atrodys patrauklesni.

Paimkime pavyzdį, kad suprastume, kaip komentarų laukelyje galime pridėti nuotraukų ar vaizdų fono.

Turime duomenis dviejuose lapuose, kuriuose turime kiekvieno darbuotojo įėjimo ir išvykimo laiką, taip pat įrašėme darbo valandas, viršvalandžius ir įprastas valandas lape su keliais komentarais, į kuriuos norime pridėti nuotraukų ar vaizdų.

Norėdami pridėti nuotraukų ar vaizdų komentarų laukelyje, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:
Sub AddPictureComment ()
Dim sh kaip darbalapis
Nustatykite sh = ThisWorkbook.Sheets (1)
sh.Range ("E10"). AddComment ("Šeštadienis išjungtas")
sh.Range ("E10"). Comment.Shape.Fill.UserPicture "D: \ Data \ Flower.jpg"
sh.Range ("D12"). AddComment ("Bendras darbo laikas - įprastos valandos")
sh.Range ("D12"). Comment.Shape.Fill.UserPicture "D: \ Data \ Flower.jpg"
Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia turime pasirinkti temos pavadinimą ir tada apibrėžti diapazoną, kuriame norime pridėti komentarą, ir iš kur norime pridėti paveikslėlį komentarų laukelyje.
Norėdami paleisti makrokomandą, paspauskite klaviatūros klavišą F5, o komentarai su vaizdais bus rodomi komentarų laukelyje.

Taip galime sukurti komentarus, paslėpti, ištrinti, įterpti vaizdą į komentarų laukelį per „Microsoft Excel“ VBA.

Darbo su „Excel VBA UserForms“ pradžia| Aš paaiškinsiu, kaip sukurti formą „Excel“, kaip naudoti VBA įrankių rinkinį, kaip tvarkyti vartotojo įvestis ir galiausiai, kaip išsaugoti vartotojo įvestis. Mes pereisime šias temas naudodami vieną pavyzdį ir žingsnis po žingsnio vadovą.

VBA kintamieji „Excel“| VBA reiškia „Visual Basic for Applications“. Tai programavimo kalba iš „Microsoft“. Jis naudojamas su „Microsoft Office“ programomis, tokiomis kaip „MSExcel“, „MS-Word“ ir „MS-Access“, tuo tarpu VBA kintamieji yra konkretūs raktiniai žodžiai.

„Excel VBA“ kintamoji apimtis| Visose programavimo kalbose mes turime kintamosios prieigos specifikatorius, kurie apibrėžia, iš kur galima pasiekti apibrėžtą kintamąjį. „Excel VBA“ nėra išimtis. VBA taip pat turi apimties specifikacijas.

ByRef ir ByVal argumentai | Kai argumentas perduodamas kaip „ByRef“ argumentas kitam padaliniui ar funkcijai, siunčiama tikrojo kintamojo nuoroda. Bet kokie kintamojo kopijos pakeitimai atsispindės pradiniame argumente.

Ištrinkite lapus be patvirtinimo raginimų naudodami „Microsoft Excel“ VBA | Kadangi trinate lapus naudodami VBA, žinote, ką darote. Norite pasakyti „Excel“ nerodyti šio įspėjimo ir ištrinti prakeiktą lapą.

Pridėkite ir išsaugokite naują darbaknygę naudodami „Microsoft Excel 2016“ VBA| Šiame kode pirmiausia sukūrėme nuorodą į darbaknygės objektą. Ir tada mes jį inicijavome naudodami naują darbo knygos objektą. Šio metodo pranašumas yra tas, kad galite lengvai atlikti operacijas su šia nauja darbaknyge. Kaip išsaugoti, uždaryti, ištrinti ir pan

Rodyti pranešimą „Excel“ VBA būsenos juostoje| „Excel“ būsenos juosta gali būti naudojama kaip kodo monitorius. Kai jūsų VBA kodas yra ilgas ir atliekate kelias užduotis naudodami VBA, dažnai išjungiate ekrano atnaujinimą, kad nematytumėte to ekrano mirgėjimo.

Išjunkite įspėjamuosius pranešimus naudodami VBA programoje „Microsoft Excel 2016“| Šis kodas ne tik išjungia VBA įspėjimus, bet ir padidina kodo laiko efektyvumą. Pažiūrėkime, kaip.

Populiarūs straipsniai:

50 „Excel“ nuorodų, skirtų produktyvumui padidinti | Greičiau atlikite savo užduotį. Šie 50 sparčiųjų klavišų leis dar greičiau dirbti naudojant „Excel“.

„VLOOKUP“ funkcija „Excel“ | Tai yra viena iš dažniausiai naudojamų ir populiariausių „Excel“ funkcijų, naudojama norint ieškoti vertės iš įvairių diapazonų ir lapų.

COUNTIF „Excel 2016“ | Naudodami šią nuostabią funkciją, suskaičiuokite reikšmes su sąlygomis. Norint suskaičiuoti konkrečias vertes, nereikia filtruoti duomenų. Skaitiklio funkcija yra būtina norint paruošti prietaisų skydelį.

Kaip naudoti „SUMIF“ funkciją „Excel“ | Tai dar viena esminė prietaisų skydelio funkcija. Tai padeda apibendrinti vertes konkrečiomis sąlygomis.