Worksheet add Problem
26.03.2007 18:04:48
Ryu_Hoshi
Ich habe das folgende Problem.
Ich füge beim Makro beim jeder Ausführung 2 Tabellen. Da ich später darauf verweise, habe ich das Problem das ich das Makro nur 1 mal ausführen kann, weil die Tabellen dann nicht mehr Tabelle1 und Tabelle 2 heissen. Deshalb wollte ich dieses Problem lösen.
Public letzteZeile As Long
Public wks As Excel.Worksheet
Public wk2 As Excel.Worksheet
Sub Makro1()
Set wks = ActiveWorkbook.Worksheets.Add
letzteZeile = ThisWorkbook.Worksheets(wks).UsedRange.SpecialCells(xlCellTypeLastCell).Row
Ich bekomme in beim festlegen der letzten Zeile die Fehlermeldung "Laufzeitfehler 13. Typen unverträglich". Woran könnte dies liegen?