HERBERS Excel-Forum - das Archiv
Übergabe eines Arbeitsblattes VBA
Hagen

Hallo Forum
ich möchte ein Arbeitsblatt an eine Methode übergeben und habe dazu vereinfacht folgendes probiert:


Public Sub test(table2 As Worksheets)
table2.Select
End Sub



Public Sub Worksheet_Activate()
test (Worksheets("Tabelle3"))
End Sub


mit dem Resultat:
Objekt unterstützt Eigenschaft oder Methode nicht.
Hat jemand vielleicht eine idee dazu?
VG Hagen

AW: Übergabe eines Arbeitsblattes VBA
René

Hi Hagen
So richtig verstehe ich dein Ansinnen nicht.
Was willst du erreichen?
Das Arbeitsblatt öffnen (Select)?
Falls dieses der Fall ist, kannst du das in der Excelumgebung mit einem CommandButton oder Kombinationsfeld oder dergleichen erreichen.
In einem Makro ist das nichts anderes.
Auf alle Fälle reicht,
Sheets(x).Activate
wobei x für die Tabellennummer steht.
Oder du sprichst die Tabelle direkt mit Namen an.
Sheets("Tabelle1").Activate
Gruß René

AW: Übergabe eines Arbeitsblattes VBA
Rudi

Hallo,


Public Sub test(table2 As Worksheet)
table2.Select
End Sub
Public Sub Worksheet_Activate()
test Worksheets("Tabelle3")
End Sub


Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

AW: Übergabe eines Arbeitsblattes VBA
Peter

Hallo Hagen
dein Aufruf ist falsch, er muss so aussehen Call test(Worksheets("Tabelle3"))
wenn du schon Klammern verwendest.
Ob das, was du da möchtest geht, weiß ich allerdings nicht.
Gruß Peter

AW: Übergabe eines Arbeitsblattes VBA
KarinW

Hallo Hagen,


ändere Public Sub test(table2 As Worksheets)
in         Public Function(table2 As Worksheets)
und natürlich auch End Sub in End Function.


Freundliche Grüße
Karin