Heyho, ich hab ein Problem mit diesem Codeschnipsel:
Sub Schreib(IDCount As Integer, Current As String)
Dim MCol As Range
Dim TCol As Range
MCol = Range(Current & "_")
TCol = Range(Current)
For j = 2 To IDCount + 1
Mains.Cells(j, MCol.Column).Value = TCol.Worksheet.Cells(j, TCol.Column).Value
Next j
End Sub
Und zwar wird bei mir in der Zeile, wo MCol zugewiesen wird, der im Betreff stehende Fehler angezeigt.
"Current" ist hierbei ein Name, der auch mit 100%iger Sicherheit zugewiesen ist (Habs mehrmals überprüft)
Was muss ich da anstatt nur "Range" hinschreiben?
Lg, Cedrick
|