Excel Makro-Aufruf über Schaltfläche funktioniert nicht mehr

Hallo,

bei mir hat nun geholfen: Solver-Add-in deaktivieren => Excel neu starten.

Makro-Schaltfläche funktioniert wieder und das Solver-Add-in kann wieder aktiviert werden.

Claus

Hi Claus,

Besten Dank für die ausführliche und sehr nützliche Hilfestellung.

Damit sind meine Probleme geklärt, aber leider noch nicht behoben.

Bernd

Danke, hab's ins
MSDN Forum gestellt

Hallo beroen,

wenn du Probleme mit Makros hast, schau bitte in unser
MSDN Forum nach Hilfe rein.

Das Entwickler-Forum unterstützt nämlich Makros und VBAs.

Bei irgendwelchen anderen Fragen stehe ich natürlich zur Verfügung.

MfG

Hallo,

du hast nicht sauber referenziert. Außerdem ist ein Wert, der wie ein Datum aussieht, intern als Ganzzahl gespeichert. Er sieht nur durch das Format so aus. Ändere die Makros für Vor und Rück:

Sub Vor_BeiKlick()

  Application.ScreenUpdating = False

  Worksheets(3).Visible = True

  With Sheets("Monat")

      .Unprotect

      .Range("A2") = DateAdd("m", 1, CDate(.Range("A2")))

   End With

'  lz3 = Sheets(3).Cells(Rows.Count, 1).End(xlUp).Row

'  If lz3 > 1 Then Call aktuell

  Call aktuell

End SubSub Rück_BeiKlick()

  Application.ScreenUpdating = False

  With Sheets("Monat")

   dat = DateAdd("m", -1, CDate(.Range("A2")))

   If dat < .Range("C1") Then Exit Sub

      Worksheets(3).Visible = True

      .Unprotect

      .Range("A2") = dat

   End With

  lz3 = Sheets(3).Cells(Rows.Count, 1).End(xlUp).Row

'  If lz3 > 1 Then

  Call aktuell

  Worksheets(3).Visible = False

End Sub

Bei mir läuft es nach diesen Änderungen ohne Probleme.

Claus