VBA-Bandwurmausdrücke zusammenfassen
14.06.2009 20:20:28
Jörg
wer nur ein paar Brocken VBA spricht, ist froh, wenn er überhaupt was Funktionierendes zustande bringt, egal wie es aussieht. Aber irgendwann merkt man dann doch, daß es wohl stümperhaft ist. Hier ein Beispiel:
Wie kann ich dies in einem eleganteren Ausdruck zusammenfassen?
wsTarget.Range(wsConfig.Range("B12").Value).NumberFormat = "0"" gr/qm"""
wsTarget.Range(wsConfig.Range("B13").Value).NumberFormat = "0"" gr/qm"""
wsTarget.Range(wsConfig.Range("B14").Value).NumberFormat = "0"" gr/qm"""
wsTarget.Range(wsConfig.Range("B15").Value).NumberFormat = "0"" gr/qm"""
Danke für 'ne Anregung...
Jörg