Laufzeitfehler 9
22.10.2020 17:56:04
bjoern
ja also das Problem ist
ich lassen den Sheets(a).Name per If mit vergleichen mit den Inhalt einer Zelle
achja die Vollständigkeit Sorry
also zu erst
tabelend = Sheets(1).Cells(8, 4).Value 'da steht das ende der Tabelle drin, als Zahl
For a = 1 To tabelend
If Sheets(a).Name = nam Then
vari = vari + 1
End If
Next a
bei denn if und spuckt er nun Laufzeitfehler 9 aus
vor 3 Wochen mit der alten Webquelle hatte es aber noch funktioniert
wo ist der Fehler?
ein manuelles Kopieren > Namen ersetzen hat erstmal nix gebacht
bitte nicht so zu böse sein wenn ich die Geflogenheite dieses Forums immer noch nicht kann