Der richtige Codename?

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Eisi,
in Makros kannst du ein Tabellenblatt im Code auf 4 Varianten ansprechen

1. den Namen auf Register-Tab
diesen kannst du ändern nach Doppelklick auf das Register-Tab
oder Rechte-Maus-Klick auf das Register-Tab und "Umbenennen"
oder dem Eigenschaftenfenster im VBA-Edior

Worksheets("tbl_Test").Range("A1").Value = 3

2. Die Index-Nummer - Die Zählung der Index-Nummer beginnt mit 1 beim linken Register
Die Index-Nummer wird von Excel automatisch vergeben.
Hilfreich, wenn der Blattname sich ändert, der Index des Blattes aber immer gleich ist.

Sheets(1).Range("A1").Value = 3

3. Den Codenamen des Tabellenblatts
Den Codenamen kannst du nur im VBA-Editor im Eigenschaftenfenster ändern.

tbl_Test.Range("A1").Value = 3

4. als aktives Blatt
Hier wird vom Code das in Excel aktive Tabellen Blatt bearbeitet.

ActiveSheets.Range("A1").Value = 3

LG
Franz
Hier ein Makro, das Informationen zu den Tabellenblättern in der aktiven Arbeitsmappe anzeigt.

Sub Test()
Dim objSheet As Object
Dim strType As String
For Each objSheet In ActiveWorkbook.Sheets
With objSheet
Select Case .Type
Case xlWorksheet
strType = "Tabellenblatt"
Case 3
strType = "Diagramm"
Case Else
strType = "sonstige"
End Select
If MsgBox("Information zu Blätter in aktiver Arbeitsmappe" & vbLf _
& "Indexnummer: " & .Index & vbLf _
& "Blattname: " & .Name & vbLf _
& "Codename: " & .CodeName & vbLf _
& "Type: " & strType, _
vbOKCancel, "Blatt-Information") = vbCancel Then Exit For
End With
Next
End Sub

…musst du in diesem Umfang nur vornehmen, Eisi,
wenn du tatsächlich damit rechnest, auf diese Mappe mal verweisen zu müssen. Das wäre dann so OK, allerdings würde ich die namensimmanente Hierarchie von links nach rechts (vorn nach hinten) anlegen, da so üblicherweise (auch im VBE) sortiert wird.
Wenn du von einer anderen Mappe auf diese Mappe verweisen willst, ist die wichtigste Umbennenung die von VBAProject (und wahrscheinlich auch die von DieseArbeitsmappe, da das dann letztlich angezeigt wird), die bei dir jetzt Testuebung lautet. Darauf kannst du nun aus einem anderen Projekt verweisen. Öffnest du dann die verweisende Mappe, wird diese Mappe ebenfalls geöffnet. Das fktioniert übrigens bei AddIns genauso, sonst kannst du sie nicht (mit Projekt-Default-CodeName) in Xl per VBE so einbinden, dass sie den VBA-Projekten anderer Mappen zV stünden (ergäbe Ablehnung wg Uneindeutigkeit — MehrfachVerwendung eines Namens für Unterschiedliches).
In deinem Fall wurde dir ohnehin die Umbenennung der Blatt-CodeNames empfohlen. DieseArbeitsmappe ist auch nur ein Default-Name, quasi ein Platzhalter für einen eigenen Namen. Der könnte dann auch nur TestUeb (oder AmTestUeb) lauten, die Blatt-CodeNames dann ggf mit TestUebTbl anfangen, damit dir die Zuordnung auch noch nach Monaten leicht ersichtlich ist, wenn du diesen CodeName aus einem anderen Projekt, das auf diese Mappe verweist, aufrufst. Außerdem wdn dann das AmBlatt u.die TabBlätter im VBE in der gewohnten Reihenfolge angeordnet.
Ein Bsp für eine solche Namenshierarchie kenne ich nicht, so etwas denkt sich jeder, der es braucht, nach Zweckmäßigkeit aus. Und das habe ich ja nun noch deutlicher beschrieben und Empfehlungen gegeben.
Übrigens, bei den normalen Modulen (.bas) wäre der Name egal, falls du die nicht für Operationen mit denselben brauchst (CodeZeilen zählen, einfügen, löschen, PgmBereiche suchen u.ä.).
Tipp: Gg Plattsein hilft (langsames) Luftholen… ;-)
Viel Erfolg, Luc :-?

Beliebteste Forumthreads (12 Monate)

11 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread