Kleine Excel-Frage zu Bezügen(absolut/relativ)

chris1308

Moderator i.R.
Themenstarter
Registriert
23 Jan. 2011
Beiträge
3.672
Hallo,

ich habe eine Exceltabelle:
[TABLE="class: outer_border, width: 500"]
[TR]
[TD][/TD]
[TD]A[/TD]
[TD]B
[/TD]
[TD]C
[/TD]
[TD]D
[/TD]
[/TR]
[TR]
[TD]1
[/TD]
[TD][/TD]
[TD][/TD]
[TD]=A1
[/TD]
[TD]=A11
[/TD]
[/TR]
[TR]
[TD]2
[/TD]
[TD][/TD]
[TD][/TD]
[TD]=A2
[/TD]
[TD]=A12
[/TD]
[/TR]
[TR]
[TD]3
[/TD]
[TD][/TD]
[TD][/TD]
[TD]=A3
[/TD]
[TD]=A13
[/TD]
[/TR]
[TR]
[TD]4
[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]5
[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]6
[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]7
[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]8
[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]9
[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[/TABLE]

In der Spalte A stehen jede Menge Werte.
Und soll dies in den Spalten C bis BB(im Moment) in 10er Blöcken aufgespaltet werden.
Sonst bin ich ja gewohnt, dass man Formeln weiterziehen kann. Wenn ich aber nach rechts ziehe, kann sich ja die Spaltenzahl nicht inändern.
Gibt es da eine Lösung?
Ich will nicht in alle c-bb Spalten es manuel eintragen.

Gruß
Christopher
 
Moin Chris,

also: wählst deine erste Zelle in der Spalte C an und tippst eine Runde
Code:
=$A1
und ziehst die Zelle am kleinen Kästchen 10 Zeilen weiter. Danach klickst du auf Zelle D1 und tippst
Code:
=$A11] und machst einen Doppelklick auf dein Kästchen.
Das ist die einzige Möglichkeit die mir einfällt.
Das dann bis BB.

Grüße

sys.
 
Hi,
das folgende VBA-Macro macht dies. Geht vielleicht noch schöner, funktioniert m. E. aber.
Einfach Endespalte als Zahl eingeben.
BB wäre 54
Wenn es abhängig von der Anzahl der Werte in Spalte A ist, könnte man die Anzahl abfragen und ohne Inputbox auskommen.

Sub fuellen()
durchgang = 0
For spalte = 3 To InputBox("bitte letzte Spalte angeben")
For Zeile = 1 To 10
Cells(Zeile, spalte).FormulaLocal = "=A" & Zeile + 10 * durchgang
Next
durchgang = durchgang + 1
Next

End Sub
 
Zuletzt bearbeitet:
  • ok1.de
  • ok2.de
  • thinkstore24.de
  • Preiswerte-IT - Gebrauchte Lenovo Notebooks kaufen

Werbung

Zurück
Oben