Dieser Code ist für VBA innerhalb Excels, nicht für Visual Basic 6.5. In Ihrer Frage baten Sie um VBA und nicht VB, gibt es einen Unterschied.
Diese Frage bitte schließen, indem Sie diese Anmerkung 33039684, wie sie die ursprüngliche Frage beantwortet, die bekannt gegeben wird und eine neue Frage wieder aufgreifen annehmen, die eine VB 6.5 Lösung und nicht eine VBA Lösung spezifiziert.