Hallo Excel Profis,
ich möchte mit einem Makro horizontal soweit scrollen, so das die spalte "X" mittig meines bildschirms steht.
Gibt es dafür ein vba?
gruss
Fred

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: horiz. scrollen / spalte x mittig

11.10.2021 09:06:45

volti

AW: horiz. scrollen / spalte x mittig

11.10.2021 09:06:45

volti

Hallo Fred,
hier eine Idee, ein Ansatz dazu zum Testen und Spielen.
Abhängig von den Spaltenbreiten wird das aber nicht immer gelingen mit der Mittigkeit.

Code:


[Cc]

Sub Setze_X_Mittig()
  Dim i As Integer, l As Currency
 
  l = Cells(1, "X").Width &bsol; 2
  For i = 25 To 1 Step -1
      l = l + Cells(1, i).Width
      If l > (ActiveWindow.VisibleRange.Width &bsol; 2) Then Exit For
  Next i
  If i > 2 Then i = i - 1 Else i = 1
  ActiveWindow.ScrollColumn = i
End Sub

_________________________
viele Grüße aus Freigericht 😊
Karl-Heinz

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn(finden dann)

34081
zelle färben wenn andere zelle wert

23512
excel text links von zeichen

16681

Weitere Forumthreads anzeigen

excel zeichen einfügen am anfang

16052

scrollen in excel nicht möglich

15741

formeln kopieren ohne anpassung der zellbezüge

15343

excel formel enthält

14267

excel wenn wert in zelle dann andere zelle kopieren

12306

excel ab bestimmten zeichen abschneiden

11938

excel erste ziffer entfernen

11417

excel summe zeigt 0

10634

excel zelle farbig wenn andere zelle text

10521

zählenwenns mit oder

9511

excel links zeichen abschneiden

9498

excel string enthält teilstring

9480

excel wenn leer dann leer lassen

9079

excel vba variable in zelle schreiben

8864

excel teil bis leerzeichen

8800

zählenwenn datumsbereich

8428

excel formel doppelte werte nur einmal zählen

8178

excel zelleninhalt in andere zelle übernehmen

8062

excel text ab bestimmten zeichen

7989

excel formel rechts ab zeichen

7915

wenn wert größer als und kleiner als dann

7806

letzte zeile vba

7675

excel datum und uhrzeit in einer zelle

7521

excel zellen ausblenden button

7291

excel umrechnung minuten in stunden

7167

excel zelleninhalt ausblenden wenn

7070

cursor kreuz statt pfeil

7068

excel aus kalenderwoche monat ermitteln

6935

excel wenn datum älter als dann rot

6521

excel summewenn nicht

6515

excel daten untereinander statt nebeneinander

6294

excel vba zellinhalt löschen

6182

excel wenn wert negativ dann 0

6026

wenn formel mit uhrzeit

6006

excel nur letzten 4 zeichen einer zelle

5981

excel wenn wert in liste vorhanden dann

5920

excel nur das erste wort einer zelle

5910

excel shortcut blatt wechseln

5872

excel zahlen fortlaufend funktioniert nicht

5838

wenn mehrere zellen leer dann

5829

excel datei durch mich selbst gesperrt obwohl nicht geöffnet

5734

excel letzten buchstaben entfernen

5705

@ in excel formel

5689

sverweis summe aller werte

5676

excel wenn zelle leer dann wert aus anderer zelle sonst

5582

excel wort in zelle suchen und ausgeben

5539

excel uhrzeit minuten addieren

5492

excel vba suchen und anzeigen

5379

zählen wenn nicht leer

5341

excel summewenns über mehrere spalten

5321

excel führende nullen entfernen formel

5224

zelle färben, wenn andere zelle wert

5182

excel vba abfrage ja nein

5105

excel aus namen e mail adresse

5082

sverweis nicht gefunden dann 0

5082

excel vba zellfarbe ändern

5053

wenn farbe dann

5053

buchstaben aus excel zelle entfernen

4974

excel wert aus anderer zelle übernehmen wenn bedingung erfüllt

4903

excel summewenn ungleich

4847

excel formel anführungszeichen

4841

excel string enthält teilstring

4789

excel datum + monate

4769

excel summe zwischen zwei datumsangaben

4754

vba mit passwort schützen

4727

excel zeichen finden von rechts

4710

vba if or mehrere bedingungen

4679

excel liniendiagramm mit mehreren linien

4659

excel datumsformat lässt sich nicht ändern

4654

excel bildgröße an zelle anpassen

4588

punkte entfernen excel

4564

excel erste vier zeichen löschen

4556

text aus anderer zelle übernehmen excel

4516

excel als text gespeicherte zahl in zahl umwandeln vba

4508

zeilenumbruch excel vba

4482

excel zählen wenn enthält

4469

excel spaltennummer ermitteln in der ein wert steht

4452

excel vba prüfen ob tabellenblatt existiert

4430

makro stoppen

4411

excel datum automatisch einfügen bei eingabe

4362

excel tabelle kopieren ohne inhalt

4360

excel summe und runden in einer zelle

4357

excel aktuelle zeit

4332

vba excel userform schließen

4327

durchschnitt aus prozentwerten

4327

excel kalenderwochen in datum umwandeln

4324

excel wert in spalte suchen und zeile ausgeben

4308

excel verketten mit datum

4300

excel vba verweis auf zelle anderes tabellenblatt

4285

excel gruppen benennen

4260

excel gruppieren geht nicht

4229

wenn funktion zu viele argumente

4199

vba zeilenumbruch

4182

excel dropdown leere zellen ignorieren funktioniert nicht

4158

excel blattschutz filtern erlauben

4142

excel umbruchvorschau ausblenden

4075

excel aktuelles jahr ausgeben

4025

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn(finden dann)

34081
zelle färben wenn andere zelle wert

23512
excel text links von zeichen

16681

Weitere Forumthreads anzeigen

excel zeichen einfügen am anfang

16052

scrollen in excel nicht möglich

15741

formeln kopieren ohne anpassung der zellbezüge

15343

excel formel enthält

14267

excel wenn wert in zelle dann andere zelle kopieren

12306

excel ab bestimmten zeichen abschneiden

11938

excel erste ziffer entfernen

11417

excel summe zeigt 0

10634

excel zelle farbig wenn andere zelle text

10521

zählenwenns mit oder

9511

excel links zeichen abschneiden

9498

excel string enthält teilstring

9480

excel wenn leer dann leer lassen

9079

excel vba variable in zelle schreiben

8864

excel teil bis leerzeichen

8800

zählenwenn datumsbereich

8428

excel formel doppelte werte nur einmal zählen

8178

excel zelleninhalt in andere zelle übernehmen

8062

excel text ab bestimmten zeichen

7989

excel formel rechts ab zeichen

7915

wenn wert größer als und kleiner als dann

7806

letzte zeile vba

7675

excel datum und uhrzeit in einer zelle

7521

excel zellen ausblenden button

7291

excel umrechnung minuten in stunden

7167

excel zelleninhalt ausblenden wenn

7070

cursor kreuz statt pfeil

7068

excel aus kalenderwoche monat ermitteln

6935

excel wenn datum älter als dann rot

6521

excel summewenn nicht

6515

excel daten untereinander statt nebeneinander

6294

excel vba zellinhalt löschen

6182

excel wenn wert negativ dann 0

6026

wenn formel mit uhrzeit

6006

excel nur letzten 4 zeichen einer zelle

5981

excel wenn wert in liste vorhanden dann

5920

excel nur das erste wort einer zelle

5910

excel shortcut blatt wechseln

5872

excel zahlen fortlaufend funktioniert nicht

5838

wenn mehrere zellen leer dann

5829

excel datei durch mich selbst gesperrt obwohl nicht geöffnet

5734

excel letzten buchstaben entfernen

5705

@ in excel formel

5689

sverweis summe aller werte

5676

excel wenn zelle leer dann wert aus anderer zelle sonst

5582

excel wort in zelle suchen und ausgeben

5539

excel uhrzeit minuten addieren

5492

excel vba suchen und anzeigen

5379

zählen wenn nicht leer

5341

excel summewenns über mehrere spalten

5321

excel führende nullen entfernen formel

5224

zelle färben, wenn andere zelle wert

5182

excel vba abfrage ja nein

5105

excel aus namen e mail adresse

5082

sverweis nicht gefunden dann 0

5082

excel vba zellfarbe ändern

5053

wenn farbe dann

5053

buchstaben aus excel zelle entfernen

4974

excel wert aus anderer zelle übernehmen wenn bedingung erfüllt

4903

excel summewenn ungleich

4847

excel formel anführungszeichen

4841

excel string enthält teilstring

4789

excel datum + monate

4769

excel summe zwischen zwei datumsangaben

4754

vba mit passwort schützen

4727

excel zeichen finden von rechts

4710

vba if or mehrere bedingungen

4679

excel liniendiagramm mit mehreren linien

4659

excel datumsformat lässt sich nicht ändern

4654

excel bildgröße an zelle anpassen

4588

punkte entfernen excel

4564

excel erste vier zeichen löschen

4556

text aus anderer zelle übernehmen excel

4516

excel als text gespeicherte zahl in zahl umwandeln vba

4508

zeilenumbruch excel vba

4482

excel zählen wenn enthält

4469

excel spaltennummer ermitteln in der ein wert steht

4452

excel vba prüfen ob tabellenblatt existiert

4430

makro stoppen

4411

excel datum automatisch einfügen bei eingabe

4362

excel tabelle kopieren ohne inhalt

4360

excel summe und runden in einer zelle

4357

excel aktuelle zeit

4332

vba excel userform schließen

4327

durchschnitt aus prozentwerten

4327

excel kalenderwochen in datum umwandeln

4324

excel wert in spalte suchen und zeile ausgeben

4308

excel verketten mit datum

4300

excel vba verweis auf zelle anderes tabellenblatt

4285

excel gruppen benennen

4260

excel gruppieren geht nicht

4229

wenn funktion zu viele argumente

4199

vba zeilenumbruch

4182

excel dropdown leere zellen ignorieren funktioniert nicht

4158

excel blattschutz filtern erlauben

4142

excel umbruchvorschau ausblenden

4075

excel aktuelles jahr ausgeben

4025

horiz. scrollen / spalte x mittig

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread