Seite 1 von 1
Bereiche Kopieren (nur Ergebnisse keine Formel)
Verfasst: Di, 20.11.2012 00:07
von bebhbgebb
ich möchte gern die ergebnisse von formeln kopieren, die in einem bestimmten bereich stehen.
angenommen in den zellen A5:A35 befinden sich formeln, die unterschiedliche ergebnisse auswerfen.
diese ergebnisse möchte ich gern mit einem kleinen makro in die danebenliegende spalte kopieren.
mit getdataarray und setdataarray kenne ich mich noch nicht wirklich gut aus

Re: Bereiche Kopieren (nur Ergebnisse keine Formel)
Verfasst: Di, 20.11.2012 08:00
von Karolus
Hallo
..mit getDataArray kenne mich nicht gut aus
dem kann man abhelfen
Code: Alles auswählen
sub kopieren
doc = thisComponent
sheet = doc.Sheets.getByName("Tabelle1")
data = sheet.getCellRangeByName("A5:A35").getDataArray()
sheet.getCellRangeByName("B5:B35").setDataArray( data )
end sub
Karolus
Re: Bereiche Kopieren (nur Ergebnisse keine Formel)
Verfasst: Mi, 28.11.2012 20:14
von willi64de
Hallo Karolus
Kurz und schmerzlos. Das verstehe sogar ich und konnte es problemlos anpassen.
danke

Re: Bereiche Kopieren (nur Ergebnisse keine Formel)
Verfasst: Fr, 14.12.2012 23:19
von hebbe
Karolus hat geschrieben:Hallo
..mit getDataArray kenne mich nicht gut aus
dem kann man abhelfen
Code: Alles auswählen
sub kopieren
doc = thisComponent
sheet = doc.Sheets.getByName("Tabelle1")
data = sheet.getCellRangeByName("A5:A35").getDataArray()
sheet.getCellRangeByName("B5:B35").setDataArray( data )
end sub
Karolus
Hallo Karolus,
wie würde den der Code aussehen, wenn ich für den Bereich A5:A35 über Einfügen | Namen festlegen den
Namen Bereich1 und für B5:B35 den Namen Bereich2 definiert hätte(sog. namendranges). Will damit verhindern,
dass sich durch einfügen/löschen von Zeilen davor evtl. die falschen Zellen kopiert werden.
Hoffe Du kannst mir da weiterhelfen.
Viele Grüße
hebbe
Re: Bereiche Kopieren (nur Ergebnisse keine Formel)
Verfasst: Sa, 15.12.2012 00:02
von Karolus
Code: Alles auswählen
sub kopieren_NamedRanges
doc = thisComponent
NamedRanges = doc.NamedRanges
source = NamedRanges.getByName("Bereich1").getReferredCells()
target = NamedRanges.getByName("Bereich2").getReferredCells()
data = source.getDataArray()
target.setDataArray( data )
end sub
Karolus
Mit
mri lassen sich solche Dinge relativ einfach herausfinden!
Re: Bereiche Kopieren (nur Ergebnisse keine Formel)
Verfasst: Do, 20.12.2012 23:22
von hebbe
Hallo Karolus,
vielen Dank für die Hilfe, es funktioniert einwandfrei, habe es eben getestet.
Habe aber noch eine weitere Frage. Gibt es die Möglichkeit, alle Felder des benannten Bereichs anstatt mit
Werten aus einem anderen Bereich auch mit "0" zu füllen?
Danke für die Hilfe und viele Grüße
hebbe