Clever-Excel-Forum

Normale Version: Variable für mehrere Subs
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo Zusammen,

folgender Ausgangscode:

Code:
Option Explicit

Public i As String

Sub A()
    i = 22  
End Sub

Sub Monat()
Januar:
If Range("C2") = "X" Or Range("C2") = "Y" Then
With Cells(i, 3)
       .Offset(0, 0).FormulaLocal = "=" .....

Ich habe versucht oben eine Variable "i" mit dem Wert "22" festzulegen, die dann weiter unten in verschiedenen Subs wieder aufgegriffen werden soll und anstelle von "i" dann der Wert "22" genommen werden soll.

Leider funktioniert es nicht so, wie ich es mir vorgestellt habe Smile

Vielleicht könnt ihr mir helfen.

Viele Grüße,

Jules
Hallo Jules,
Public i As Long
Gruß Uwe
Hallo Uwe,

danke für deine Antwort.

Leider bekomme ich einen Laufzeitfehler '1004': Anwendungs- oder objektdefinierter Fehler ..
Hallo Jules

wie der Kollege Uwe schon erklaerte gab es hier einen Deklarationsfehler!

Zahlen und Texte die im Code Konstant bleiben lege ich lieber in eine Const Anweisung oder Public Const wenn sie Öffentlich sind, 
z.B.:  Public Const i = 22   oder als Text  Public Const Pfad = "E:\Excel Forum" 

Weil ich i und j oft als Zaehler in For Next Schleifen benutze gebe ich Konstanten immer einen eigenen Namen der für ich sinnvoll ist:
z.B.   Public Const Farbe = 3   'für Schriftfarbe Rot   oder Public Const IFarbe = 4  'für Innenfarbe

mfg Gast 123
Hallo Gast 123,

das ist ein guter Tipp!

Ich danke euch Smile