Mit nachfolgender Funktion frage ich die Adresse des benannten Bereiches ab. Es handelt sich hier in der Regel um eine Mehrfachauswahl, die Rückgabe ist z.B.
A4,D4,I4:J4,N4:R4,U4:V4,Z4:AA4,AE4:BZ4
Wie der Name der Funktion schon sagt, möchte ich jedoch nicht die genauen Zellen abfragen, sondern die Spalten.
Meine Fragen:
- wie muss ich die Funktion erweitern, dass die Rückgabe (obiges Beispiel) wie folgt aussieht:
A:A,D:D,I:J;N:R,U:V,Z:AA;AE:BZ
- Wie muss ich die Funktion anpassen, dass ich bei deren Aufruf den Parameter ohne "" eingeben kann?
--> anstelle =BereichsSpalten("AAA") =Bereichsspalten(AAA)
Function BereichsSpalten(Name As String) As String
BereichsSpalten = Range(Name).Address(0, 0)
End Function
Vielen Dank für jede Hilfestellung.Danke, Peter