florian86
Goto Top

Excel Formatierung über gesamtes Tabellenblatt

Hallo,

ich habe das Problem das unsere Mitarbeiterin mit haufen Aufwand eine Tabelle erstellt hat und die gesamte Tabelle
vorformatiert hat. Dadurch dauert es sehr lange ( bis 750000 und mehr zeilen ) bis diese aufgeht bzw. die arbeit darin ist auch sehr mühselig.

Kann man Zeilen und Spalten ab einen gewissen Punkt löschen. z.b.: lösche alle Zeilen ab 15000?


Dann habe ich noch eine 2. Sache...

In Excel kann man ja z.B.: Wert um 1 erhöhen mit reinem ziehen der Werte. Jetzt habe ich aber

1a
1b
2a
2b
3a
3b

usw.

Da fun ktioniert das leider nicht. Gibt es dazu eine Lösung. Das Problem ist das dies bis 15000 gemacht werden soll face-smile
.

MfG

Florian86

Content-Key: 267489

Url: https://administrator.de/contentid/267489

Printed on: April 23, 2024 at 11:04 o'clock

Mitglied: 114757
Solution 114757 Mar 26, 2015 updated at 07:49:39 (UTC)
Goto Top
Zu 1:
Range("15000:" & Rows.Count).ClearContents  

Zu 2:
Dim i as integer, cnt as Integer
cnt =1
for i = 1 to 14999 Step 2
    Cells(i,1).Value = cnt & "a"  
    Cells(i+1,1).Value = cnt & "b"  
    cnt = cnt + 1
Next
Gruß jodel32
Member: Florian86
Florian86 Mar 26, 2015 at 07:49:36 (UTC)
Goto Top
Hallo Punkt 1 konnte ich mit deiner Hilfe lösen, musste es aber so machen...

Range("15000:" & Rows.Count).delete shift:=xlup

dann hat es funktioniert.

riesen danke schon mal.

Den 2. Punkt probier ich gleich aus.

MfG

Florian86
Member: Florian86
Florian86 Mar 26, 2015 at 07:58:30 (UTC)
Goto Top
Der 2. Punkt hat wunderbar funktioniert .

Danke.

MfG

Florian86