Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Kliknite na kartu " Vývojár " a kliknite na " Visual Basic " pre spustenie VB editora . . Kliknite na " ponuku Vložiť " a kliknite na tlačidlo " modul " vložiť nový kód modulu
2
Vytvoriť nový čiastkový postup pridaním nasledujúceho kódu :
Private Sub determineChart ( )
3
Pridajte nasledujúci kód pre prechod na ďalší riadok kódu , ak dôjde k chybe :
On Error Resume Next
4
Zistite , či " Chart1 " existuje pridaním nasledujúci kód :
chartTst = ActiveWorkbook.Worksheets ( " Hárok1 " ) ChartObjects ( "Tabuľka 1 " )
5
Pozrite sa na " chartTst . " variabilné a zobrazí sa okno so správou o tom , či graf existuje .
Ak chartTst nie je nič Potom
MsgBox " schéma neexistuje "
Else
MsgBox " Chart existuje . "
End If
6
End sub zadaním " End sub " na konci procesu . Stlačte " F5 " pre spustenie procedúry .
Copyright © počítačové znalosti Všetky práva vyhradené