Seite 1 von 1

makro: verschiedene tabellenbereiche gleichzeitig kopieren und einfügen

Verfasst: Fr, 18.12.2015 09:11
von Sennah
hallo und einen guten morgen!

mit dem im dateianhang ersichtlichen makro kopiere ich aus dem tabellenbereich F17 bis F28 die werte und füge sie gleichzeitig in E17 bis E28 ein.

ich würde eine erweiterung der programmierung benötigen, damit ZUSÄTZLICH und GLEICHZEITIG der tabellenbereich K17 bis K28 in J17 bis J28 eingefügt wird.

kann mir bitte jemand weiterhelfen?

danke im voraus,
sennah
formel.jpg
formel.jpg (127.88 KiB) 2597 mal betrachtet

Re: makro: verschiedene tabellenbereiche gleichzeitig kopieren und einfügen

Verfasst: Fr, 18.12.2015 09:41
von Stephan
... GLEICHZEITIG ...
Ich fürchte ich ahne worauf das hinausläuft und frage: Wozu?

Der Weg den ich für den gebräuchlichen halte ist es das Ganze 'nacheinander' zu tun, also:

Code: Alles auswählen

quelle = Array("F17:F28", "K17:K28")
ziel = Array("E17:E28", "J17:J28")
oTab = ThisComponent.Sheets.getByName("5. at-at (signale)")
For i = 0 To 1
  oBereich = oTab.getCellRangeByName(quelle(i))
  aData = oBereich.getDataArry()
  oZielbereich = oTab.getCellRangeByName(ziel(i))
  oZielbereich.setDataArray(aData)
Next i
Anmerkung:
mit Arrays zu arbeiten bringt für nur 2 Bereiche keinen wesentlichen Vorteil, ich zeige es aber so weil es für eine größere Anzahl von Bereichen dann doch Vorteile bringt (weniger Code und mehr Übersicht)


Gruß
Stephan

Re: makro: verschiedene tabellenbereiche gleichzeitig kopieren und einfügen

Verfasst: Fr, 18.12.2015 09:56
von Sennah
hallo stephan!

das ist perfekt und funktioniert genau so wie ich es haben wollte!

vielen, vielen dank für deine hilfe und auch dafür, dass du so rasch zeit gefunden hast mir zu antworten!

liebe grüße, sennah