Hallo Leute,
ich habe ein Problem, dass mich gerade total irre macht.
Vor allem, da ich vermute, dass es nur eine Kleinigkeit ist.
ich möchte in eine Zelle über einen String einen variablen Zellbezug schreiben. (Über String, da ich das Abzählen der Zeilen und Zellen nicht mag).
Ich habe folgende Varianten versucht, die leider alle zu dem selben Ergebnis geführt haben:
Verständnishalber ein paar Codeschnipsel
Code:
Global VarRange As Range
Global VarCount As Integer
Global VarField As Integer
Global StaField As IntegerDim TargetCell As String
Dim SelRow As String
Dim SelRow2 As String
Dim InputCell As String
Dim InputCell2 As String
Dim InsertCell As String
Dim Input4Cell As String
Set VarRange = Worksheets("Grundeinstellungen").Range("b11:b25")
VarCount = Application.WorksheetFunction.CountIf(VarRange, "<>")
TargetCell = "B" & StaField + VarCount
Range(InsertCell).Select
ActiveCell.FormulaR1C1 = InputCell
Hier jetzt 2 der verschiedenen Varianten wie InputCell definiert wurde:
Code:
Input4Cell = ("=Grundeinstellungen!" & TargetCell)
InputCell = ("=Grundeinstellungen!" & StaField + VarCount)
das Ergebnis als MsgBox ist immer richtig und lautet wie folgt: =Grundeinstellungen!B14
sobald ich jedoch den String in die Zelle einsetzen lasse macht Excel folgendes daraus: =Grundeinstellungen!'B14'
und diese ' zerstören den Code so das Excel den Zellbezug nicht findet.
Kann mir bitte jmd. sagen wie ich diese ' da weg bekomme?! Vielen Dank im Voraus.
mit Grüßen,
sto`teac
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Foren auf CAD.de (alle Foren)
| 
