VBA / Panes Anweisung

Guten Abend,

wie kann ich folgende Anweisung richtig formulieren:

>

Ich habe „Index“ errechnet, wer weiß wie die richtige Syntax lautet?

vielen Dank für eure Hilfe.

Grüße
Nikodemo

Hallo,

ActiveWindow.Panes(3).ScrollRow = INDEX

ich kann an Deinem Codeschnipsel nichts verkehrtes entdecken. Wenn Fehler auftreten, liegt es vielleicht daran, dass kein Panes(3) vorhanden ist?

Zum Testen:

If ActiveWindow.Panes.Count \>= 3 Then
 If IsNumeric(Index) Then
 If Index \> 0 Then
 ActiveWindow.Panes(3).ScrollRow = Index
 Else
 MsgBox "Index ist 0"
 End If
 Else
 MsgBox "Index ist nicht numerisch!"
 End If
Else
 MsgBox "Falsche Anzahl Panes! " & ActiveWindow.Panes.Count
End If

Gruß, Bernd

OT Ist Null immer Null für Excel-Vba?

If ActiveWindow.Panes.Count >= 3 Then
If IsNumeric(Index) Then
If Index > 0 Then
ActiveWindow.Panes(3).ScrollRow = Index
Else
MsgBox „Index ist 0“
End If
Else
MsgBox „Index ist nicht numerisch!“
End If
Else
MsgBox "Falsche Anzahl Panes! " & ActiveWindow.Panes.Count
End If

Hallo Bernd,

dein Testcode sieht okay aus, birgt aber eine Gefahr die nicht gleich auffällt. Index wurde berechnet. Wie weißte nicht.

Probier bitte den nachstehenden Code. Für dich und mich sind 3 Fünftel minus 3mal ein Fünftel 0, für Excel nicht. Liegt an der Umwandlung Dezimal in binär und reumwandlung. In gewisser Weise auch an den 15 signifikanten Stellen mit denen Excel rechnet.

Und in deinem Code prüfst du
If Index > 0 Then
ab und dieser If-Zweig wird als WAHR anerkannt obwohl Index an sich eine 0 sein sollte, damit sollte es unbedingt als FALSCH erkannt werden im Sinne deiner Programmlogik.

Besser wäre da
If Index > 0.0001
o.ä.

Sub Test()
Dim Index
Index = 3 / 5 - 1 / 5 - 1 / 5 - 1 / 5
MsgBox Index = 0 'Falsch
MsgBox Index \> 0 'Wahr
MsgBox Index '2,7 \* 10^<sup>-20</sup>
End Sub

Gruß
Reinhard

Hi, Bernd!

Hab mir inzwischen mit smallscroll beholfen. Geht genauso.

Oder besser: auf einmal gings. Glaube manchmal, mein Jitter spinnt.

(Komme erst jetzt dazu, dir zu Antworten, Tschuldigung)

Viel grüße

Nikodemo

Hallo Reinhard,

Index wird aus einem Spinbutton bedient, ist also einfache eine Ganzzahl.

Mein Code hat urplötzlich funktioniert. Glaube manchmal, mein Compiler hat ein Eigenleben. Aber das war ja schon mal so.

Trotzdem recht herzlichen Dank

Nikodemo