Moin zusammen,
ich benötige mal wieder Eure Hilfe:
der nachfolgende Code läuft auf einem deutschen
Excel 2003 problemlos. Beim Kollegen in Spanien
bleibt das Makro hängen. Ich tippe auf das Tauschen
von Punkt und Komma.
Hat jemand eine Idee?
Gruß und danke
Rolf
Sub Bild13\_BeiKlick\_E()
'
'Schaltfläche a
ActiveSheet.Shapes("Picture 183").Visible = True
ActiveSheet.Shapes("Picture 182").Visible = False
'Schaltfläche b
Tabelle4.CommandButton1.Visible = False
Tabelle4.CommandButton2.Visible = True
'Schaltfläche c
Tabelle1.Shapes("Schaltfläche 992").Visible = False
Tabelle1.Shapes("Schaltfläche 1213").Visible = True
'....
'....
'....
'Schaltfläche g
Tabelle1313.Shapes("Picture 23").Visible = False
Tabelle1313.Shapes("Picture 32").Visible = True
'....
'....
'....
'Schaltfläche p
Tabelle1.Shapes("Schaltfläche 1001").Visible = False
Tabelle1.Shapes("Schaltfläche 1232").Visible = True
'
Range("K12").Select
ActiveCell.FormulaR1C1 = "2"
Range("I3").Select
End Sub
Excel 2003 problemlos. Beim Kollegen in Spanien
bleibt das Makro hängen.
Hallo Rolf,
como siempre, Fehlerzeile, Fehlernummer, Fehlerbeschreibung…
Gruß
Reinhard
Excel 2003 problemlos. Beim Kollegen in Spanien
bleibt das Makro hängen.
Hallo Rolf,
como siempre, Fehlerzeile, Fehlernummer, Fehlerbeschreibung…
Moin Reinhard,
ja - völlig klar *vordieStirntip*
Da muss der Spanier mir mal eine Hardcopy schicken.
Bis später
Gruß
Rolf
como siempre, Fehlerzeile, Fehlernummer, Fehlerbeschreibung…
Da muss der Spanier mir mal eine Hardcopy schicken.
Hallo Rolf,
wenn der Debugger aktiv ist und die codezeile ist amarillo *gg* unterlegt soll er die Codezeile mit Hochkomma auskommentieren un dmit F8 im Code weitergehen ob noch mehr Fehlerzeilen kommen usw.
Und Punkt, Komma, Semikolon, Doppelpunkt o.ä. kann schon in anderen Ländern Probleme bereiten.
Z.B. bei FormulaloCAL.
Formular1c1 weiß ich grad nicht.
Nur Formula müßte weltweit klappen.
Er könnte mal dieses makro laufen lassen und die Namen vergleichen.
Ich denke zwar nicht daß dies der Grund ist aber so kann man ihn wenigstens ausschließen.
Sub tt()
Dim S As Shape
For Each S In ActiveSheet.Shapes
MsgBox S.Name
Next S
End Sub
Gruß
Reinhard
Grüezi Rolf
der nachfolgende Code läuft auf einem deutschen
Excel 2003 problemlos. Beim Kollegen in Spanien
bleibt das Makro hängen. Ich tippe auf das Tauschen
von Punkt und Komma.
Hat jemand eine Idee?
Wenn es exakt dieser Code ist, der hängen bleibt könnte ich mir vorstellen, dass diese Zeile(n) hier Probleme machen:
Tabelle1.Shapes(„Schaltfläche 992“).Visible = False
Tabelle1.Shapes(„Schaltfläche 1213“).Visible = True
Tabelle1313.Shapes(„Picture 23“).Visible = False
Tabelle1313.Shapes(„Picture 32“).Visible = True
Tabelle1.Shapes(„Schaltfläche 1001“).Visible = False
Tabelle1.Shapes(„Schaltfläche 1232“).Visible = True
Heissen denn diese Dinger auf dem spanischen Rechnern wirklich noch so oder werden da dann die spanischen Bezeichnungen verwendet?
Range(„K12“).Select
ActiveCell.FormulaR1C1 = „2“
Range(„I3“).Select
End Sub
Hier sehe ich kein Problem ausser dass Du einen Text in die Zelle schreibst, aber das möchtest Du ja vielleicht genau so haben.
Mit freundlichen Grüssen
Thomas Ramel
Moin Reinhard
wenn der Debugger aktiv ist und die codezeile ist amarillo
*gg* unterlegt soll er die Codezeile mit Hochkomma
auskommentieren un dmit F8 im Code weitergehen ob noch mehr
Fehlerzeilen kommen usw.
Hier nochmal mein code:
Sub Bild13\_BeiKlick\_E()
'
'Schaltfläche a
ActiveSheet.Shapes("Picture 183").Visible = True
ActiveSheet.Shapes("Picture 182").Visible = False
'Schaltfläche b
Tabelle4.CommandButton1.Visible = False
Tabelle4.CommandButton2.Visible = True
'Schaltfläche c
Tabelle1.Shapes("Schaltfläche 992").Visible = False
Tabelle1.Shapes("Schaltfläche 1213").Visible = True
'....
'....
'....
In der ersten Zeile von Schaltfläche c
Tabelle1.Shapes(„Schaltfläche 992“).Visible = False
hängt er sich weg.
Fehlercode -2147024809(80070057)
Weiter konnte ich nicht testen.
Und Punkt, Komma, Semikolon, Doppelpunkt o.ä. kann schon in
anderen Ländern Probleme bereiten.
Z.B. bei FormulaloCAL.
Formular1c1 weiß ich grad nicht.
Nur Formula müßte weltweit klappen.
Er könnte mal dieses makro laufen lassen und die Namen
vergleichen.
Der Kollege ist leider schon wieder abgereist und an die Makros traut er sich nicht ran. Ich muss versuchen, das von hier zu lösen.
Ich denke zwar nicht daß dies der Grund ist aber so kann man
ihn wenigstens ausschließen.
Sub tt()
Dim S As Shape
For Each S In ActiveSheet.Shapes
MsgBox S.Name
Next S
End Sub
Wenn ich Deinen Code bei mir teste, liest er
meine „Schaltfläche 992“ als „Button 992“ aus.
Ich habe also aus meinen „Schaltfläche nnn“ nun „Button nnn“
gemacht und mein Makro funktioniert noch. Schätze, das
Excel des spanischen Kollegen kennt den Begriff „Schaltfläche“ nicht.
Ich werde ihm die geänderte Version schicken und dann schaun wir mal…
Danke für Deine Hilfe.
Ich werde berichten ob es geklappt hat.
Gruß und frohes Schaffen
Rolf
Hallo Thomas,
der nachfolgende Code läuft auf einem deutschen
Excel 2003 problemlos. Beim Kollegen in Spanien
bleibt das Makro hängen. Ich tippe auf das Tauschen
von Punkt und Komma.
Wenn es exakt dieser Code ist, der hängen bleibt könnte ich
mir vorstellen, dass diese Zeile(n) hier Probleme machen:
Tabelle1.Shapes(„Schaltfläche 992“).Visible = False
Tabelle1.Shapes(„Schaltfläche 1213“).Visible = True
Tabelle1313.Shapes(„Picture 23“).Visible = False
Tabelle1313.Shapes(„Picture 32“).Visible = True
Tabelle1.Shapes(„Schaltfläche 1001“).Visible = False
Tabelle1.Shapes(„Schaltfläche 1232“).Visible = True
Heissen denn diese Dinger auf dem spanischen Rechnern wirklich
noch so oder werden da dann die spanischen Bezeichnungen
verwendet?
Genau, ich denke, den Begriff „Schaltfläche“ kennt er nicht.
Ich habe mal „Button“ davon gemacht. Bei mir in D läuft der Code
damit immer noch. Vielleicht klappts ja jetzt auch in Spanien.
Ich werde berichten.
Range(„K12“).Select
ActiveCell.FormulaR1C1 = „2“
Range(„I3“).Select
End Sub
Hier sehe ich kein Problem ausser dass Du einen Text in die
Zelle schreibst, aber das möchtest Du ja vielleicht genau so
haben.
Ja, das ist so gewollt.
Danke für Deine Hilfe.
Gruß
Rolf
Hallo Thomas,
der nachfolgende Code läuft auf einem deutschen
Excel 2003 problemlos. Beim Kollegen in Spanien
bleibt das Makro hängen. Ich tippe auf das Tauschen
von Punkt und Komma.
Wenn es exakt dieser Code ist, der hängen bleibt könnte ich
mir vorstellen, dass diese Zeile(n) hier Probleme machen:
Tabelle1.Shapes(„Schaltfläche 992“).Visible = False
Tabelle1.Shapes(„Schaltfläche 1213“).Visible = True
Tabelle1313.Shapes(„Picture 23“).Visible = False
Tabelle1313.Shapes(„Picture 32“).Visible = True
Tabelle1.Shapes(„Schaltfläche 1001“).Visible = False
Tabelle1.Shapes(„Schaltfläche 1232“).Visible = True
Heissen denn diese Dinger auf dem spanischen Rechnern wirklich
noch so oder werden da dann die spanischen Bezeichnungen
verwendet?
Genau, ich denke, den Begriff „Schaltfläche“ kennt er nicht.
Ich habe mal „Button“ davon gemacht. Bei mir in D läuft der
Code
damit immer noch. Vielleicht klappts ja jetzt auch in Spanien.
Ich werde berichten.
Yep, das ist der böse Bube gewesen. Jetzt klappt es auch in Spanien
Vielen Dank für den Tipp.
Gruß
Rolf
Hallo Reinhard
Ich denke zwar nicht daß dies der Grund ist aber so kann man
ihn wenigstens ausschließen.
Sub tt()
Dim S As Shape
For Each S In ActiveSheet.Shapes
MsgBox S.Name
Next S
End Sub
Wenn ich Deinen Code bei mir teste, liest er
meine „Schaltfläche 992“ als „Button 992“ aus.
Ich habe also aus meinen „Schaltfläche nnn“ nun „Button nnn“
gemacht und mein Makro funktioniert noch. Schätze, das
Excel des spanischen Kollegen kennt den Begriff „Schaltfläche“
nicht.
Ich werde ihm die geänderte Version schicken und dann schaun
wir mal…
Ich werde berichten ob es geklappt hat.
Genau das ist es gewesen. Merkwürdig, dass es in D 2 Begriffe dafür gibt.
Dein kleines Makro hat es an den Tag gebracht - super.
Danke für Deine Hilfe.
Gruß
Rolf