Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1400to1404
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zelleneintrag mit Variablen

Zelleneintrag mit Variablen
13.01.2015 10:37:41
Jonas
Hallo Forum,
der Quellcode soll die Formel "='3'!A27" eintragen, wobei 3 eine Variable und A27 eine Konstante ist.
Beim 1. Versuch habe ich das Problem das A27 so 'A27' eingetragen wird, wird also als Text in die Variable, beim Variant titt das problem ebenfalls auf.
Beim 2. Versuch verusacht ActiveCell.FormulaR1C1 einen Aufruf wo eine Datein geöffnet werden soll.
'Variablen Deklaration
Dim Int_1 As Integer
Dim Txt_1 As String
Int_1 = 3
'1. Versuch
Txt_1 = "='" & Int_1 & "'!A27"
ActiveCell.FormulaR1C1 = Txt_1
'2.Versuch
ActiveCell.FormulaR1C1 = "='" & Int_1 & "'!A27"
Danke schon mal im vorraus.

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelleneintrag mit Variablen
13.01.2015 11:00:32
hary
Moin
Du sagst doch mit der Formel Inhalt aus Blatt 3 A27 holen.
Da es in dieser Mappe kein Blatt mit dem Namen 3 gibt wird die Auswahl geoeffnet.
gruss hary

AW: Zelleneintrag mit Variablen
13.01.2015 11:11:48
fcs
Hallo Jonas,
wenn die Formel mit Zelladressen im R1C1-Format eingetragen werden soll, dann musst du die Zelladressen auch so angeben.
Alternativ kannst du mit FormulaLocal arbeiten und die Zelladressen in der gewohnten schreibweise angeben.
Gruß
Franz
Sub Formeln1()
'Variablen Deklaration
Dim Int_1 As Integer
Dim Txt_1 As String
Int_1 = 3
'1. Versuch
Txt_1 = "='" & Int_1 & "'!R27C1"
ActiveCell.FormulaR1C1 = Txt_1
'2.Versuch
ActiveCell.FormulaR1C1 = "='" & Int_1 & "'!R27C1"
End Sub
Sub Formeln2()
'Variablen Deklaration
Dim Int_1 As Integer
Dim Txt_1 As String
Int_1 = 3
'1. Versuch
Txt_1 = "='" & Int_1 & "'!A27"
ActiveCell.FormulaLocal = Txt_1
'2.Versuch
ActiveCell.FormulaLocal = "='" & Int_1 & "'!A27"
End Sub

Anzeige
AW: Zelleneintrag mit Variablen
13.01.2015 11:23:19
Jonas
Hallo Franz,
der Befehl funktioniert einwandfrei!
Vielen Dank, hat mir sehr geholfen :-)
Gruß Jonas

310 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige