CommandButton verhalten sich irre

Question

CommandButton.

Ich habe eine ExcelDatei mit 3,4MB 22 Mappen und 450 Commandbuttons. Manchmal verändern sich die Commanbuttons (Breite und Höhen sehr klein oder auch Null). Das Problem tritt manchmal, aber dann gehäuft, und mit dieser Datei nicht nur auf meinem Rechner, beim Öffen der Datei und auch beim Arbeiten auf.

Meine momentane Lösung: Ich lasse beim Öffen per VBA alle CommandButtons u.ä. nach einer Tabelle überarbeiten.

With Worksheets(Work).Shapes.Range(Array(Bez))

        .Height = H

        .Width = w

        .Left = l

        .Top = t

        .LockAspectRatio = True

 End With  

 Nur haben die halt ihre Positionen etwa/fast so wie ich in einer Tabelle eingelsen habe

Je größer die die Zeilenzah,l etwa ab Zeile 200, der Position (Top,Left) ist, desto ungenauer wird die Position.

Kann das an einem Speicherproblem liegen? (Programm wird korrekt heruntergefahren)

Danke

VincenzWien

Answer 1

Vielleicht liegt das an Deinem Code? ;-)

Wenn ich mal 200 Commandbuttons erstelle, dann gibt das kein Problem:

Sub Test()

  Dim i As Long

  Dim R As Range

  Application.ScreenUpdating = False

  For i = 1 To 20000 Step 100

    Set R = Range("A" & i)

    With R

      .Value = "hier"

      With .Offset(, 1).Resize(2, 2)

        ActiveSheet.OLEObjects.Add "Forms.CommandButton.1", _

          Left:=.Left, Top:=.Top, Width:=.Width, Height:=.Height

      End With

    End With

  Next

  Application.ScreenUpdating = True

End Sub

Einen alternativen Code zum sichern und wiederherstellen findest Du hier:

http://dl.dropbox.com/u/35239054/modShapePosition.bas

Und kuck auch mal hier:

http://support.microsoft.com/kb/2503335

Andreas.

Answer 2

Also, ich habe mich im Netz herumgetrieben und fand mehrere Probleme diesbezüglich. Das Forum Herber-Excel meint, das ist ein uralter schon bekannter Fehler in Excel.

Liegt sicher an meinem Code, aber weil die Datei so groß ist (mittlerweile 10MB) wird es wohl an der Verwaltung des Speicherplatzes durch Excel liegen. Ich kann lange Zeit mit der Datei arbeiten und dann irgendwann aus heiterm Himmel, ohne Vorwarnung, ist Excel weg. Auch verändern sich die Commandbuttons mitten unter der Arbeit. Excel ist auch nicht das Gelbe vom Ei, ist halt nicht wirklich ür große Dateien geeigent. Einen ählichen Fehler kenn ich von Ventura Publisher - weg waren ohne Vorwarnung 250 Seiten mit ca. 400 komplexen Formeln.

Ich muss halt Excel von Zeit zu Zeit herunterfahren und neu starten. Die Daten der Button ua. habe ich in einer Tabelle und kann daher auch der Anwender jederzeit die Commandbuttons wiederherstellen

Wie brige ich den blöden Fehler dem Anwender bei?

Answer 3

Hallo Herbert,

dann weiß ich leider auch nicht weiter.

Wenn du in deiner Arbeitsmappe die Daten nicht ständig änderst, oder neue Daten hinzukommen,

könnte es vielleicht helfen, die automatische Berechnung für diese Arbeitsmappe abzuschalten.

Wäre zumindest noch einen Versuch wert.

Gruß

Reiner

Answer 4

Hallo Reinerp_2001!

Natürlich! Auch das Seitenverhälnis gesperrt!

Das "Nur von Zellenposition abhängig" ist es nicht.

Zur Erklärung:

Voher wenn OK z.B: W= 300, H = 30

Wenn Fehler: W = 150, H = 2 oder auch W = 2, H = 30 

Ich hatte gerade eine Mitteilung, das das ein bekannter alter Excel-Fehler ist. Tritt nur bei großen Datein auf(?). Das ist dann sehr ärgerlich. Warum tut da Microsoft nichts?

Zudem haut mit Excel gerade ca 100 Werte aus mitten aus einer Tabelle (letzte Mappe) raus.

Gruss Herbert

Answer 5

Hallo Vincenz,

ich vermute mal, dass du das schon gemacht hast, aber wenn nicht, versuche mal folgendes:

CommandButton mit rechts anklicken > Steuerelement formatieren > Registerreiter Eigenschaften > Häkchen setzen bei Nur von Zellposition abhängig

Vieleicht hilft dir das

Gruß

Reiner