Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1452to1456
1452to1456
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spaltenbreite an vorgegebenen Wert anpassen

Forumthread: Spaltenbreite an vorgegebenen Wert anpassen

Spaltenbreite an vorgegebenen Wert anpassen
24.10.2015 09:26:31
Carsten
Hallo,
ich habe ja die Möglichkeit, die Breite einer Spalte auszulesen und in einer Zelle anzeigen zu lassen.
Ich suche nun nach einer Möglichkeit, dass Ganze umgekehrt zu machen. Ich möchte also die Breite einer Spalte in einer Zelle in Pixel angeben und die Spaltenbreite soll sich entsprechend anpassen.
Wie lässt sich das machen?
Gruß
Carsten

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spaltenbreite an vorgegebenen Wert anpassen
24.10.2015 09:47:07
hary
Moin
So wie du ausliest nur zuweisen. 
Columns(1).ColumnWidth = Cells(1, 2) '--SpalteA breite = B1

gruss hary

AW: Spaltenbreite an vorgegebenen Wert anpassen
24.10.2015 09:56:10
Carsten
Hallo hary,
ausgelesen wird per Formel =ZELLE("breite";A1). Ich dachte eher an diese Art.
Oder kann man es so steuern, dass das Makro automatisch bei einer neuen Eingabe in einer bestimmten Zelle startet?

Anzeige
AW: Spaltenbreite an vorgegebenen Wert anpassen
24.10.2015 10:27:26
hary
Moin
So auslesen ja,zuweisen nein.
Mit VBA. Code in den Code der Tabelle.
Startet wenn C1 sich aendert und es eine Zahl ist. 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Address = "$C$1" Then
If IsNumeric(Target) Then
Columns(1).ColumnWidth = Cells(1, 3) '--SpalteA breite = B1
End If
End If
End Sub

gruss hary

Anzeige
AW: Spaltenbreite an vorgegebenen Wert anpassen
24.10.2015 16:28:42
Carsten
Perfekt, vielen Dank hary

Forumthreads zu verwandten Themen

Automatische Anpassung der Zeilenhöhe
eliewsam

Hallo Excel-Freunde,
gibt es in Excel die Möglichkeit, dass die Zeilenhöhe automatisch an den geschriebenen Text angepasst wird. Die Anpassung sollte sofort erfolgen, sobald der Text in eine Zelle eingegeben wurde und mit Enter bestätigt wurde. Ich kenne bislang nur die manuelle Ausführung...
04.03.2009 10:10:50
Thread-ID: 1056219
3 Beiträge
Anzeige
Automatische Anpassung der Druckangaben per VBA
Salim


Hallo Zusammen,
Ich hatte ein kleines Thema, der euch wahrscheinlich sehr einfach erscheint, mir aber leider nicht ;)
Ich habe folgende Eingaben :
Blatt1 : Zelle E19 : Eingabes eines Wortes mit weniger als 20 Zeichen
Blatt1 : Zelle E22 : Eingabes eines Wortes mit weniger al...
01.10.2009 20:39:01
Thread-ID: 1106712
5 Beiträge
Spaltenbreite = optimale Breite + X
Falk

Hallo zusammen,
ich würde gerne die Spaltenbreiten der Spalten in meiner Tabelle auf den Wert "optimale Breite" + X setzen, wobei "X" entweder im Code fest vorgegeben wird oder beim Start des Makros abgefragt wird.
Schön wäre es, wenn nur die aktuell markierten Spalten von der Breitenän...
28.04.2010 16:33:57
Thread-ID: 1154333
3 Beiträge
Zellgröße automatisch an Textlänge anpassen?
Martin

Hallo liebe Herber-Gemeinde,
gibt es eine Möglichkeit die Zellgröße in Excel automatisch an den darin vorhandenen Text anzupassen, ohne dass der Text dabei verkleinert wird?
Die fragliche Zelle wird mittels einer Formel mit Text aus einem anderen Tabellenblatt befüllt, der von Monat zu...
02.06.2010 12:11:47
Thread-ID: 1159990
6 Beiträge
Anzeige
Spaltenbreite in Excel 2003 automatisch anpassen
Maximilian

Guten Tag!
Kann man in Excel 2003 die Spaltenbreite irgendwie automatisch anpassen? Alternativ per VBA Script? Hat da jemand einen Tipp?
13.12.2012 13:09:16
Thread-ID: 1290735
3 Beiträge
Wandernde Dropbox anpassen; Text in Zahl wandeln
Marcus

Hallo,
folgenden Code hat mir Rudi Mantaire zur Verfügung erstellt.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim rngJahr As Range Set rngJahr = Intersect(Range("A1"), Target) If Not rngJahr Is Nothing Then varJahr = Range("A1").Value ComboBox1.Visible = False If Tar...
13.11.2014 14:52:13
Thread-ID: 1392208
10 Beiträge
Spaltenbreite an Zoomstufe anpassen
Michael

Hallo,
gibt es die Möglichkeit je nach Zoomstufe Excel zu veranlassen die Spaltenbreite automatisch anzupassen, so dass die Werte immer angezeigt werden und nicht ##### wenn zu wenig Platz vorhanden ist?
Gruß,
Michael
13.04.2015 10:22:27
Thread-ID: 1420460
2 Beiträge
Tabelle automatisch anpassen
Alex

Hallo zusammen,
ich habe folgendes Problem:
Ich habe 3 Arbeitsblätter in den ersten beiden sind Trainings und Seminare in der dritten Tabelle sollen diese zusammengefasst werden. (siehe Datei). Jeder Teilnehmer kann max. 4 Einheiten belegen.
Im angehängtem Beispiel steht bei Lisa i...
25.07.2015 10:26:30
Thread-ID: 1438438
3 Beiträge
Diagramm per VBA automatisch anpassen(formatieren)
Shayev

Hallo zusammen,
ich habe eine Frage, gibt es eine Möglichkeit per VBA ein Diagramm automatisch anzupassen, so dass die Datenbeschriftungen passen und die Achsen mit ihren Werten lesbar sind. Vielen Dank im Voraus.
Gruß Shayev
16.08.2016 10:22:50
Thread-ID: 1509477
5 Beiträge
Zellengroesse automatisch an Textgroesse anpassen
Tom

Hallo Excel-Cracks,
Wie kann ich die Zelle formatieren, dass diese sich automatisch an die Textgroesse anpasst.Das heisst, wenn text mit fuenf buchstaben eingegeben wird,
wird die Zelle schmaler und wenn Text mit 25 Buchstaben eingegeben wird, soll sich die Zelle automatisch vergroessern...
19.09.2002 11:38:39
Thread-ID: 161693
4 Beiträge
Zelle an Textlänge anpassen Schriftgrösse unveränd
Carole

Hallo Zusammen
Ich versuche, einen längeren Text in eine Zelle unterzubringen, die Schriftgrösse soll sich dabei jedoch NICHT ändern. Es soll lediglich die Zellenhöhe entsprechend der Textlänge automatisch angepasst werden. Folgende Fehlversuche habe ich hinter mir und weiss nun nicht mehr...
07.12.2018 13:35:14
Thread-ID: 1661780
7 Beiträge
Spalte beim Zoom automatisch anpassen
Leila19

Guten Tag,
leider habe ich über die Suche nichts gefunden. Ich habe eine Excel-Datei die ich auf unterschiedlichen Quellen anschaue (Laptop, 23'Monitor, 45'Flat) Da die Tabelle aus der Datei nicht immer ins Fenster passt arbeite ich mit der Zoomfunktion unten rechts. Ziehe ich den Zoom dann...
10.01.2019 14:45:43
Thread-ID: 1667217
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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