Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema OptionButton
BildScreenshot zu OptionButton OptionButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema ScrollBar
BildScreenshot zu ScrollBar ScrollBar-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema SpinButton
BildScreenshot zu SpinButton SpinButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

aktive Command Button klappt nicht | Herbers Excel-Forum


Betrifft: aktive Command Button klappt nicht von: Jürgen
Geschrieben am: 30.01.2012 18:10:30

Hallo hab da ein kleines Problem

ich wollte anstelle eines Macros ein Commandbutton (Steuerelemente) verwenden.

Wenn ich beim Commandbutton exact das gleiche eintrage wie beim Makro bekomme ich immer einen Laufzeit Fehler 75 Fehler beim Zugriff auf Pfad /Datei.

Hier mein Eintag im Commandbutton gleich Macro bis auf erste Zeile natürlich!

Private Sub CommandButton1_Click()

Sheets("Grunddaten").Select
    P = Range("J5")  ***Hier steht das Laufwerksverzeichnis und der Dateiname

Sheets("intern").Select
    X = Range("A1")

Sheets("Eingabe").Select
Application.ScreenUpdating = False


Dim Zei As Long, strZeilen As String
With Worksheets("Berechnung")
  For Zei = 1 To .Cells(Rows.Count, 1).End(xlUp).Row
    If .Cells(Zei, 1).Value <> "" Then
      strZeilen = strZeilen & "10000,1,1,1;24,a;51,1;10," & .Cells(Zei, 1).Value & vbCrLf
      strZeilen = strZeilen & X & vbCrLf & vbCrLf
    End If
  Next Zei
End With
Close
Open P For Output As #1  ***hier erscheint immer eine Fehlermeldung und wenn man darüber fä _
hrt ist P= leer
  Print #1, Left(strZeilen, Len(strZeilen) - 4)
Close #1
End Sub



Wo mache ich einen denkfehler bzw. was habe ich in meinem Code falsch.
Wie gesagt führe ich obigen Code als Makro aus klappt alles perfekt!

Danke für ne Hilfe

  

Betrifft: AW: aktive Command Button klappt nicht von: Hajo_Zi
Geschrieben am: 30.01.2012 18:18:11

Hallo Jürgen,

Duu solltest auf Select usw. verzichten, ich glaube das geht nicht.

GrußformelHomepage


  

Betrifft: AW: aktive Command Button klappt nicht von: Jürgen
Geschrieben am: 30.01.2012 19:23:12

ja das wars - DANKESCHÖN!!!


Beiträge aus den Excel-Beispielen zum Thema "aktive Command Button klappt nicht"