Pridanie VBA CommandButton s príslušným kódom

Pridanie príkazu VBA CommandButton s príslušným kódom nie je zložitá úloha. To len vyžaduje trochu vedomostí o programe Excel a makrá. Tlačidlá VBA umožňujú vyvolať makrá, zobraziť správy a vykonávať ďalšie funkcie. Použite VBA inorder na pridanie ďalších funkcií do pracovných hárkov programu Excel bez toho, aby ste mali vedomosti o technických detailoch vlastností príkazu VBA CommandButton alebo funkcií, ako je napríklad kliknutie VBA CommandButton . Skopírujte kód do príslušného modulu a potvrďte, či je tlačidlo v činnosti. Jeden môže zvýšiť funkčnosť pracovných hárkov pridaním VBA CommandButton s príslušným kódom . Softvér Office je jednoznačne rozvinutejší ako kedykoľvek predtým.

Vložte tieto dve časti kódu do všeobecného modulu (napríklad Module1).

 Sub CreateButton () Dim Obj ako objekt Dim kód ako reťazec tabuľky ("Sheet1") Vyberte 'vytvoriť tlačidlo Set Obj = ActiveSheet.OLEObjects.Add (ClassType: = "Forms.CommandButton.1", _ Link: = False, DisplayAsIcon : = False, Left: = 200, Top: = 100, Šírka: = 100, Výška: = 35) Obj.Name = "TestButton" 'buttonn text ActiveSheet.OLEObjects (1) .Object.Caption = "Testovacie tlačidlo"' makro text Kód = "Sub ButtonTest_Click ()" & vbCrLf Kód = Kód & "Call Tester" & vbCrLf Kód = Kód & "Koniec Sub" 'pridať makro na konci modulu listu s ActiveWorkbook.VBProject.VBComponents (ActiveSheet.Name ) .CodeModule .insertlines .CountOfLines + 1, koniec kódu s koncom Sub Sub Tester () MsgBox "Kliknite na tlačidlo" End "

Stiahnuť ▼: