Handbuch BasicMaker 2010 - SoftMaker

Beispiel:
Object
Sub Sample()
Dim pm as Object
Dim newDoc as Object
Dim newSheet as Object
Set pm = CreateObject("PlanMaker.Application")
pm.Visible = True
' Ein Dokument hinzufügen
Set newDoc = pm.Workbooks.Add
' Dem Dokument ein Arbeitsblatt hinzufügen
Set newSheet = newDoc.Sheets.Add("MySheet")
' Namen des neuen Arbeitsblatts anzeigen
MsgBox newSheet.Name
End Sub
Mit dem von Add zurückgegebenen Sheet können Sie arbeiten wie mit jedem anderen Arbeitsblatt. Sie können aber
auch den Rückgabewert von Add ignorieren und sich das neue Arbeitsblatt beispielsweise über ActiveSheet holen.
Sheet (Objekt)
Zugriffspfade:
Application Workbooks Item Sheets Item
Application Workbooks ActiveSheet
Application ActiveWorkbook ActiveSheet
Application ActiveSheet
1 Beschreibung
Ein Sheet-Objekt repräsentiert ein einzelnes Arbeitsblatt eines in PlanMaker geöffneten Dokuments.
Für jedes Arbeitsblatt eines Dokuments existiert ein eigenes Sheet-Objekt. Fügen Sie dem Dokument Arbeitsblätter
hinzu oder löschen diese, werden die zugehörigen Sheet-Objekte dynamisch angelegt bzw. entfernt.
2 Zugriff auf das Objekt
Die einzelnen Sheet-Objekte können auf folgenden Wegen angesprochen werden:
Alle zu einem Dokument gehörenden Arbeitsblätter werden in der Sammlung Workbook.Sheets (Typ: Sheets) verwaltet:
' Die Namen aller Arbeitsblätter des aktiven Dokuments anzeigen
For i = 1 To pm.Application.ActiveWorkbook.Sheets.Count
MsgBox pm.Application.ActiveWorkbook.Sheets.Item(i).Name
Next i
Das aktive Arbeitsblatt eines Dokuments erhalten Sie über Workbook.ActiveSheet:
' Den Namen des aktuellen Arbeitsblatts anzeigen
MsgBox pm.Application.Workbooks(1).ActiveSheet.Name
Das aktive Arbeitsblatt des aktiven Dokuments erhalten Sie über Application.ActiveSheet:
' Den Namen des aktuellen Arbeitsblatts des aktiven Dokuments anzeigen
MsgBox pm.Application.ActiveSheet.Name
Handbuch BasicMaker 2010 BasicMaker und PlanMaker 205