Office: (Office 2010) Spaltenbreite fixieren

Hallo,

ich lese eine SQL Datenbank mit Excel 2010 aus.
Da nicht alle Spalten ohne seitwärts zu scrollen auf ein Blatt passen, möchte ich die Spaltenbreite jeweils verkleinern (bei jeder Spalte anders).
Dies funktioniert so lange, bis die SQL Datenbank einen refresh macht. Dann sind die Spaltenbreiten wieder wie gehabt.
Die Funktion Blatt schützen verhindert zwar dass die Spaltenbreite verändert wird, jedoch werden die Zellen bei einem refresh nicht mehr überschrieben und haben somit keine aktuellen Werte drin.
Geht das noch anders?

:)

 

Hallo,
ja das geht.

Lade deine Datei.
Starte den Makrorekorder.
Name vergeben und einen Shortcut.
Makro speichern in "Persönliche Makroarbeitsmappe"
Alle Spalten auf die gewünschte Breite einstellen.
Aufzeichnung beenden.

Nur jetzt in diesem Fall zum Testen:
Schließe die Datei ohne zu speichern!
Öffne die Datei wieder und gebe den Shortcut ein,

OK?

Gruß
Rainer

 

Danke für Deine Hilfe.
Funktioniert soweit, jedoch wenn die Inhalte der Datenbank aktualisiert werden (jede Minute) sind die Spalten wieder breiter und man muss den Shortcut eingeben.
Wie läuft das automatisch ab?
Bzw. kann man es so einstellen, dass man die Breitenänderung visuell nicht sieht?

 

Habe ne Lösung gefunden:

Makro1:
Sub Spaltenbreite()
'
' Spaltenbreite Makro
'
' Tastenkombination: Strg+q
'
Columns("A:A").ColumnWidth = 15
Columns("L:L").ColumnWidth = 66
Columns("C:C").ColumnWidth = 7.71
Columns("AB:AB").ColumnWidth = 40
Columns("AS:AS").ColumnWidth = 46.43
Columns("AU:AU").ColumnWidth = 52
Columns("BA:BA").ColumnWidth = 8.29

End Sub

Nun soll dieses Makro ausgeführt werden wenn an dem Sheet etwas geändert wird. Also Rechtsklick auf "Tabelle 1" - "code anzeigen".
Im VB Editor im Pull-Down Menü bei Allgemein - Worksheet ausgewählt und folgenden Code eingegeben:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Call Spaltenbreite
End Sub

 

Hallo,
Danke für deine Rückmeldung.
Ich ging davon aus, dass du jedesmal eine neue Datei bekommst.
Deshalb auch Persönliche Makroarbeitsmappe.

Das Bildschirmflackern kannst du durch
Application.ScreenUpdating = False und = True unterbinden.

Nun gut Thema erledigt.
Was gibt es sonst noch zu tun?

Gruß
Rainer

 

Vielen Dank für Deine Rückmeldung.
Ich habe tatsächlich noch eine Frage.
Der Inhalt der SQL Datenbank wird ja ausgelesen.
Ich habe eine Tabelle mit den Ereignissen von morgen.
Wenn nun aber Freitag ist, sollen die Ereignisse von Samstag, Sonntag und Montag gezeigt werden. Bei allen übrigen Tagen (Montag bis Donnerstag) nur vom folgenden Tag.
Aktuell mache ich es mit dem Datumsfilter -> Morgen. Dies funktioniert mit meinem Wochenend + Montag Vorhaben nicht.
Was könnte man da machen?

 

Um dir wirklich helfen zu können, müsste man die Struktur der Daten wissen.
Hast du es schon mit dem Erweiterten Filter (auch Spezialfilter genannt) probiert?

Gruß
Rainer

 

Nein, habe ich noch nicht.
Habe bisher nur die beiden oberen Makros eingebunden.