Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen

Einer Sub Parameter übergeben | Herbers Excel-Forum


Betrifft: Einer Sub Parameter übergeben von: bastula
Geschrieben am: 04.02.2010 11:47:25

Liebe Excel Experten,

ich hab gerade ein Problem, wo ich einfach nicht weiter komme: ich möchte einer Sub einen Range übergeben, so in diesem Stil:

Private Sub CommandButton2_Click()
    Call do_something("MeinRange")
End Sub
Den Bereich hab ich in der Tabelle "MeinRange" benannt.

Die Sub sieht so aus:

Sub do_something(derRange As Range)
...
End Sub Ich bekomme beim Aufruf der ersten Sub aber immer eine Fehlermeldung "Type mismatch".

Kann mir hier jemand weiterhelfen? VIELEN DANK im voraus,

b.

  

Betrifft: AW: Einer Sub Parameter übergeben von: Luschi
Geschrieben am: 04.02.2010 12:00:29

Hallo bastula,

ich mach es so:

Private Sub CommandButton2_Click()
    Call do_something("MeinRange")
End Sub

Sub do_something(derRange As String)
    Dim rg As Range
    
    'hier wird aus dem übergebenen Namen als Text der Bereich als Range erstellt
    Set rg = ThisWorkbook.Names(derRange).RefersToRange
    'usw.
End Sub
Gruß von Luschi
aus klein-Paris


  

Betrifft: AW: Einer Sub Parameter übergeben von: Nepumuk
Geschrieben am: 04.02.2010 12:01:10

Hallo,

so:

Private Sub CommandButton2_Click()
    Call do_something(Range("MeinRange"))
End Sub

Gruß
Nepumuk


  

Betrifft: AW: Einer Sub Parameter übergeben von: Luschi
Geschrieben am: 04.02.2010 12:08:02

Hallo Nepumuk,

mit Range("MeinRange") erhalte ich öfters mal aus unerklärlichen Gründen Vba-Fehler '1004' und kann es mit nicht erklären.
Deshalb benutze ich nur noch Thisworkbook.Names("MeinRange").RefersToRange

Gruß von Lluschi
aus klein-Paris


  

Betrifft: AW: Einer Sub Parameter übergeben von: Nepumuk
Geschrieben am: 04.02.2010 14:16:01

Hallo Luschi,

ich geb dabei grundsätzlich die Tabelle an, auf der sich der Namen bezeiht. Damit hatte ich noch nie Probleme.

Gruß
Nepumuk


  

Betrifft: AW: Einer Sub Parameter übergeben von: bastula
Geschrieben am: 04.02.2010 12:10:20

DANKE, das hat mir gefehlt!

Gruss b.


Beiträge aus den Excel-Beispielen zum Thema "Einer Sub Parameter übergeben"