Kā izmantot komentāru iespēju, izmantojot VBA

Anonim

Šajā rakstā mēs uzzināsim, kā lietot komentāru opciju programmā Microsoft Excel, izmantojot VBA.

Komentārs ir avots, no kura mēs varam nodot ziņojumu katram lietotājam, ja tam ir jāsniedz informācija par kādu konkrētu šūnu.

Mēs iemācīsimies:-

  • Kā ievietot komentāru?
  • Kā izdzēst visus komentārus?
  • Kā dzēst visus komentārus no visām darblapas lapām?
  • Kā daļēji slēpt komentārus?
  • Kā pilnībā slēpt komentārus?
  • Kā parādīt vienu komentāru?
  • Kā redzēt vai parādīt visus komentārus visā Excel darbgrāmatā?
  • Slēpt konkrētus komentārus programmā Excel- komentāri joprojām tiks parādīti.
  • Kā programmā Excel pievienot fona fotoattēlus/attēlu komentārus?

Tagad sāciet ar to, kā ievietot komentāru Excel lapā?

Ņemsim piemēru, lai saprastu, kā mēs varam ievietot komentārus Excel lapā.

Mums ir dati 2. lapā, kurā mums ir katra darbinieka ieejas un izejas laiks, kā arī lapā esam ierakstījuši darba stundas, virsstundas un parastās stundas. Dažās šūnās mēs vēlamies ievietot komentārus.

Lai pievienotu komentārus lapā, rīkojieties šādi:-

  • Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
  • Ievietojiet moduli.

Uzrakstiet zemāk minēto kodu:

Sub AddComment ()
Dim sh kā darblapa
Iestatīt sh = ThisWorkbook.Sheets (1)
sh.Range ("E10"). AddComment ("Sestdiena izslēgta")
sh.Range ("D12"). AddComment ("Kopējais darba laiks - regulāras stundas")
sh.Range ("I12"). AddComment ("8 stundas dienā, reizinot ar 5 darba dienām")
sh.Range ("M12"). AddComment ("Kopējais darba laiks no 2014. gada 21. jūlija līdz 2014. gada 26. jūlijam")
Beigt apakš

Koda skaidrojums:- Vispirms mums jāizvēlas temata nosaukums, tad mēs definēsim mainīgos un pēc tam definēsim visus diapazonus, kur mēs vēlamies ievietot komentārus.
Lai palaistu makro, nospiediet tastatūras taustiņu F5. Visi komentāri tiks atjaunināti Excel lapā. Komentārus varat identificēt ar sarkano taisnstūri šūnu stūrī.

Kā no lapas izdzēst visus komentārus?

Ņemsim piemēru, lai saprastu, kā mēs varam izdzēst visus komentārus Excel lapā.

Mums ir dati 2. lapā, kurā mums ir katra darbinieka ieejas un izejas laiks, kā arī lapā esam ierakstījuši darba stundas, virsstundas un parastās stundas. Programmā Excel mums ir daži komentāri, kurus mēs vēlamies izdzēst.

Lai izdzēstu visus lapas komentārus, rīkojieties šādi:-

  • Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
  • Ievietojiet moduli.
  • Uzrakstiet zemāk minēto kodu:
Sub DeleteComment ()
Šūnas. SkaidrsKomentāri
Beigt apakš

Kā izdzēst visus komentārus no visām darbgrāmatas šūnām?

Ņemsim piemēru, lai saprastu, kā mēs varam izdzēst visus komentārus Excel lapā.

Mums ir dati divās lapās, kurās mums ir katra darbinieka ieejas un izejas laiks, kā arī lapā esam ierakstījuši darba stundas, virsstundas un parastās stundas. Programmā Excel mums ir daži komentāri, kurus mēs vēlamies izdzēst, ne tikai no aktīvās lapas pat no darbgrāmatas.

Lai dzēstu visus komentārus no visām darbgrāmatas darblapām, rīkojieties šādi:-

  • Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
  • Ievietojiet moduli.
  • Uzrakstiet zemāk minēto kodu:
Sub DeleteAllComments ()
Dim wsh kā darblapa
Dim CmtAs CommentFor katru wsh ActiveWorkbook.Worksheets
Par katru Cmt In wsh.Comments
Cmt. Dzēst
Nākamais
Nākamais
Beigt apakš

Koda skaidrojums: - Pirmkārt, mums jāizvēlas tēmas nosaukums, un pēc tam mēs veiksim cilpu, lai pārbaudītu lapas, un pēc tam izdzēsiet visus komentārus no visām lapām.

Lai palaistu makro, nospiediet tastatūras taustiņu F5. Visi komentāri tiks izdzēsti no visām darbgrāmatas lapām.

Kā daļēji slēpt komentārus?

Ņemsim piemēru, lai saprastu, kā mēs varam daļēji slēpt komentārus.

Mums ir dati divās lapās, kurās mums ir katra darbinieka ieejas un izejas laiks, kā arī lapā esam ierakstījuši darba stundas, virsstundas un parastās stundas. Programmā Excel mums ir daži komentāri, kurus vēlamies slēpt.

Lai paslēptu komentārus no visām darblapām, rīkojieties šādi:-

  • Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
  • Ievietojiet moduli.
  • Uzrakstiet zemāk minēto kodu:
Apakš slēpt komentārus ()
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Beigt apakš

Koda skaidrojums: - Vispirms mēs piešķirsim temata nosaukumu, tad mēs definēsim kodu, lai slēptu komentārus.
Lai palaistu makro, nospiediet tastatūras taustiņu F5. Visi komentāri tiks izdzēsti no visām darbgrāmatas lapām.

Kā slēpt komentārus pilnībā?

Ņemsim piemēru, lai saprastu, kā komentārus var pilnībā slēpt.

Mums ir dati divās lapās, kurās mums ir katra darbinieka ieejas un izejas laiks, kā arī lapā esam ierakstījuši darba stundas, virsstundas un parastās stundas. Programmā Excel mums ir daži komentāri, kurus mēs vēlamies pilnībā slēpt. Tas nozīmē, ka komentāriem jābūt tur, bet tiem nevajadzētu parādīties nevienam, izņemot lietotāju, kurš varēs rediģēt komentāru. Tā rezultātā šī nav droša metode, lai pilnībā aizsargātu lietotāja komentārus.

Lai komentārus pilnībā paslēptu, rīkojieties šādi:-

  • Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
  • Ievietojiet moduli.
  • Uzrakstiet zemāk minēto kodu:
Apakš slēpt komentārus pilnīgi ()
Application.DisplayCommentIndicator = xlNoIndicator
Beigt apakš

Koda skaidrojums: - Vispirms mums jāizvēlas tēmas nosaukums, un pēc tam jādefinē kods, lai komentārus pilnībā paslēptu.
Lai palaistu makro, nospiediet tastatūras taustiņu F5. Visi komentāri tiks pilnībā paslēpti no Excel darblapas.

Kā parādīt vienu komentāru, un tam vienmēr jābūt redzamam?

Makro tiek izmantots, lai Excel darblapā vai darbgrāmatā parādītu dažus svarīgus komentārus.

Ņemsim piemēru, lai saprastu, kā mēs varam parādīt vienu komentāru programmā Excel.

Mums ir dati divās lapās, kurās mums ir katra darbinieka ieejas un izejas laiks, kā arī lapā esam ierakstījuši darba stundas, virsstundas un parastās stundas. Programmā Excel mums ir daži komentāri, kurus vēlamies parādīt atsevišķajā komentārā no N skaitļa komentāra.

Lai parādītu vienu komentāru, rīkojieties šādi:-

  • Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
  • Ievietojiet moduli.
    • Uzrakstiet zemāk minēto kodu:
Sub AddComment ()
Dim sh kā darblapa
Iestatīt sh = ThisWorkbook.Sheets (1)
sh.Range ("E10"). Komentārs.Visible = True
Beigt apakš

Koda skaidrojums: - Vispirms mēs izlemjam tēmas nosaukumu, un tad mums ir jādefinē kods, lai darblapā tiktu parādīts viens komentārs.
Lai palaistu makro, nospiediet tastatūras taustiņu F5. Tiks parādīts tikai viens komentārs, bet citi komentāri paliks slēpti.

Kā parādīt visus komentārus visā Excel darbgrāmatā?

Tas ir noderīgi, ja mēs saņemam no kāda darbgrāmatu un mēs nezinām, kurā šūnā ir piezīmes darbgrāmatā, tāpēc mēs varam izmantot šo VBA kodu, lai parādītu visus komentārus darbgrāmatā.

Ņemsim piemēru, lai saprastu, kā mēs varam parādīt visus komentārus visā Excel darbgrāmatā.

Mums ir dati divās lapās, kurās mums ir katra darbinieka ieejas un izejas laiks, kā arī mēs esam ierakstījuši darba laiku, virsstundas un parastās stundas lapā ar dažiem komentāriem. Bet visi komentāri ir paslēpti, un mēs vēlamies redzēt visus slēptos komentārus.

Lai parādītu vienu komentāru, rīkojieties šādi:-

  • Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
  • Ievietojiet moduli.
  • Uzrakstiet zemāk minēto kodu:
Sub ShowAllComments ()
Application.DisplayCommentIndicator = xlCommentAndIndicator
Beigt apakš

Koda skaidrojums: - Vispirms mums jāizlemj par tēmas nosaukumu, un pēc tam jādefinē kods, lai darblapā tiktu parādīti visi komentāri.
Lai palaistu makro, nospiediet tastatūras taustiņu F5. Visi komentāri tiks parādīti Excel lapā.

  • Slēpt konkrētus komentārus programmā Excel- komentāri joprojām tiks parādīti.

Kā paslēpt konkrētu komentāru programmā Excel?

Tas ir noderīgi, lai paslēptu dažus komentārus, kurus mēs nevēlamies visiem parādīt datos.

Ņemsim piemēru, lai saprastu, kā mēs varam paslēpt dažus konkrētus komentārus visā Excel darbgrāmatā.

Mums ir dati divās lapās, kurās mums ir katra darbinieka ieejas un izejas laiks, kā arī lapā esam ierakstījuši darba stundas, virsstundas un parastās stundas.

Lai paslēptu dažus konkrētus komentārus, rīkojieties šādi:-

  • Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
  • Ievietojiet moduli.
  • Uzrakstiet zemāk minēto kodu:
SubslēptSpecificComments ()
Dim sh kā darblapa
Iestatīt sh = ThisWorkbook.Sheets (1)
sh.Range ("E10"). Komentārs.Visible = False
sh.Range ("D12"). Komentārs.Visible = False
Beigt apakš

Koda skaidrojums: - Vispirms mums jāizlemj par tēmas nosaukumu un pēc tam jādefinē diapazoni, kurus vēlamies neredzēt.
Lai palaistu makro, nospiediet tastatūras taustiņu F5. Tiks parādīti tikai 2 komentāri no 4.

  • Kā programmā Excel pievienot fona fotoattēlus/attēlu komentārus?

Kā komentāru lodziņā pievienot fotoattēlu vai attēlu fonu?

Šis makro tiks izmantots, lai no datora komentāru lodziņā fonā iestatītu fotoattēlus vai attēlus. Tas padarīs komentārus un Excel pievilcīgāku.

Ņemsim piemēru, lai saprastu, kā komentāru lodziņā varam pievienot fotoattēlu vai attēlu fonu.

Mums ir dati divās lapās, kurās mums ir katra darbinieka ieejas un izejas laiks, kā arī mēs esam ierakstījuši darba laiku, virsstundas un parastās stundas lapā ar dažiem komentāriem, kuros mēs vēlamies pievienot attēlus vai attēlus.

Lai komentāru lodziņā pievienotu attēlus vai attēlus, rīkojieties šādi:-

  • Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
  • Ievietojiet moduli.
  • Uzrakstiet zemāk minēto kodu:
Sub AddPictureComment ()
Dim sh kā darblapa
Iestatīt sh = ThisWorkbook.Sheets (1)
sh.Range ("E10"). AddComment ("Sestdiena izslēgta")
sh.Range ("E10"). Comment.Shape.Fill.UserPicture "D: \ Data \ Flower.jpg"
sh.Range ("D12"). AddComment ("Kopējais darba laiks - regulāras stundas")
sh.Range ("D12"). Comment.Shape.Fill.UserPicture "D: \ Data \ Flower.jpg"
Beigt apakš

Koda skaidrojums: - Vispirms mums jāizvēlas temata nosaukums un pēc tam jādefinē diapazons, kurā mēs vēlamies pievienot komentāru un no kurienes mēs vēlamies pievienot attēlu komentāru lodziņā.
Lai palaistu makro, nospiediet tastatūras taustiņu F5, un komentāru lodziņā parādīsies komentāri.

Tādā veidā mēs varam izveidot komentārus, paslēpt, dzēst, ievietot attēlu komentāru lodziņā, izmantojot VBA programmā Microsoft Excel.

Darba sākšana ar Excel VBA UserForms| Es paskaidrošu, kā izveidot veidlapu programmā Excel, kā izmantot VBA rīklodziņu, kā rīkoties ar lietotāja ievadi un visbeidzot, kā saglabāt lietotāja ievadīto informāciju. Mēs apskatīsim šīs tēmas, izmantojot vienu piemēru un soli pa solim.

VBA mainīgie programmā Excel| VBA apzīmē Visual Basic for Applications. Tā ir programmēšanas valoda no Microsoft. To izmanto ar Microsoft Office lietojumprogrammām, piemēram, MSExcel, MS-Word un MS-Access, turpretī VBA mainīgie ir specifiski atslēgvārdi.

Excel VBA mainīgā darbības joma| Visās programmēšanas valodās mums ir mainīgas piekļuves specifikatori, kas nosaka, no kurienes var piekļūt definētajam mainīgajam. Excel VBA nav izņēmums. Arī VBA ir darbības jomas specifikatori.

ByRef un ByVal argumenti | Kad arguments tiek nodots kā ByRef arguments citai apakšfunkcijai vai funkcijai, tiek nosūtīta faktiskā mainīgā atsauce. Visas izmaiņas, kas veiktas mainīgā kopijā, tiks atspoguļotas sākotnējā argumentā.

Izdzēsiet lapas bez apstiprinājuma uzvednēm, izmantojot Microsoft Excel VBA | Tā kā jūs dzēšat lapas, izmantojot VBA, jūs zināt, ko darāt. Jūs vēlaties pateikt programmai Excel nerādīt šo brīdinājumu un izdzēst sasodīto lapu.

Pievienojiet un saglabājiet jaunu darbgrāmatu, izmantojot VBA programmā Microsoft Excel 2016| Šajā kodā mēs vispirms izveidojām atsauci uz darbgrāmatas objektu. Un tad mēs to inicializējām ar jaunu darbgrāmatas objektu. Šīs pieejas priekšrocība ir tā, ka jūs varat viegli veikt darbības ar šo jauno darbgrāmatu. Piemēram, saglabāšana, aizvēršana, dzēšana utt

Parādiet ziņojumu Excel VBA statusa joslā| Excel statusa joslu var izmantot kā koda monitoru. Ja jūsu VBA kods ir garš un veicat vairākus uzdevumus, izmantojot VBA, jūs bieži atspējojat ekrāna atjaunināšanu, lai neredzētu ekrāna mirgošanu.

Izslēdziet brīdinājuma ziņojumus, izmantojot VBA programmā Microsoft Excel 2016| Šis kods ne tikai atspējo VBA brīdinājumus, bet arī palielina koda laika efektivitāti. Redzēsim, kā.

Populāri raksti:

50 Excel saīsnes, lai palielinātu produktivitāti | Ātrāk izpildiet savu uzdevumu. Šie 50 īsceļi ļaus jums strādāt vēl ātrāk programmā Excel.

Funkcija VLOOKUP programmā Excel | Šī ir viena no visbiežāk izmantotajām un populārākajām Excel funkcijām, kas tiek izmantota, lai meklētu vērtību no dažādiem diapazoniem un lapām.

COUNTIF programmā Excel 2016 | Saskaitiet vērtības ar nosacījumiem, izmantojot šo apbrīnojamo funkciju. Jums nav jāfiltrē dati, lai saskaitītu noteiktas vērtības. Skaitītāja funkcija ir būtiska, lai sagatavotu informācijas paneli.

Kā lietot SUMIF funkciju programmā Excel | Šī ir vēl viena būtiska informācijas paneļa funkcija. Tas palīdz apkopot vērtības noteiktos apstākļos.