Kleine Brandlöcher von der Zigarette entfernt man am besten mit einer Nagelschere.

Ob ich mal kurz Zeit hätte. Eine Excel-Frage. Ganz dringend. Und sehr kompliziert.

Ich hatte Zeit und schaute mir das Problem an.

In einer intelligenten Tabelle befinden sich in einer Spalte lange Texte. Leider kann man sie nicht über die Zellen daneben zentrieren:

Stimmt – das ist in der intelligenten Tabelle verboten. Und das ist auch gut so.

Aber das ist so hässlich und nimmt so viel Platz weg. Und man kann nicht gut lesen.

Meine Antwort: Markieren Sie die Zellen, wählen Zellen formatieren / Ausrichtung und dort „Über Auswahl zentrieren“

Leider bleibt der Text zentriert (man kann ihn nicht linksbündig formatieren); aber damit konnte sie leben. Und war begeistert.

Und war noch begeisterter, als ich ihr den Tipp gab: mit [Strg] + [1] wechseln Sie in den Dialog „Zellen formatieren“ und mit [Strg] + [Y] oder [F4] wiederholen sie den letzten Schritt. So kann man die Tabelle schnell formatieren:

Wenn du dich zu Hause alleine fühlst, kauf dir eine Handcreme. Die zieht sofort bei dir ein.

Bei manchen Fehlermeldungen hätte sich Microsoft wirklich mehr Mühe geben können. Beispielsweise bei folgendem:

Objektvariable oder With-Blockvariable nicht festgelegt.

Die Ursache des Fehlers: Die Zelle enthält keinen Kommentar. Wahrscheinlich ist mit „Objektvariable“ das Objekt „Comment“ gemeint.

Übrigens: dieser Fehler tritt auch auf, wenn Zellen verbunden sind. Die Zeile

Range("C4:D4").Comment.Delete

führt zur gleichen Fehlermeldung:

Die korrekte Anweisung muss lauten:


Range("C4").Comment.Delete

Gerade ein Reh überfahren. Muss das erstmal verarbeiten. (Dieter, 57, Metzger)

Boah, wie schrecklich: eine Tabelle in Word (in der Kopfzeile) soll bearbeitet werden: in einer Zelle sitzt ein Bild – das soll gelöscht werden.

Mit dem VBA-Befehl Cells kann man in der Form Cells(1,1) auf die einzelnen Zellen zugreifen. Jedoch: sind Zellen verbunden, dann liefert beispielsweise Cells(2,2) ein Fehler, weil diese Zelle nicht vorhanden ist!

Die Lösung ist nicht elegant, aber sie funktioniert: Man durchläuft einfach alle Zellen – mit On Error Resume Next wird die fehlerhafte Zelle übergangen …
On Error Resume Next

Set wdDatei = wdApp.Documents.Open(Datei)


For i = 1 To wdDatei.Sections.Count


    For j = 1 To wdKopf.Range.Tables.Count
        Set wdTabelle = wdKopf.Range.Tables(j)

        intZeilenAnzahl = wdTabelle.Rows.Count
        intSpaltenAnzahl = wdTabelle.Columns.Count

        For intZeile = 1 To intZeilenAnzahl
            For intSpalte = 1 To intSpaltenAnzahl
                If wdTabelle.Cell(intZeile, intSpalte).Range.InlineShapes.Count > 0 Then
                    Set wdMyRange = wdTabelle.Cell(intZeile, intSpalte).Range.InlineShapes(1).Range

                    wdTabelle.Cell(intZeile, intSpalte).Range.InlineShapes(1).Delete

                End If
            Next intSpalte
        Next intZeile

    Next j

Kunden, die Weihrauch kauften, bestellten auch Myrrhe und Gold.

Hallo Herr Martin, im Anhang sende ich Ihnen eine Exeltabelle mit einer „mauell erstellten Kopfzeile“ und einer Zeilenschaltung in der Zelle „Anschrift“. Für einen Serienbrief benötige ich die „Kopzeilen“ ebenso die Zeilenschaltung nicht. Wie entferne ich am schnellsten die „Kopfzeilen“ und die Zeilenschaltung in der Zelle. (Teilenschaltung in einer Zelle zu entfernen, habe ich in Ihren Videos schon gefunden). Ich möchte alle Daten in einer Spalte haben. Ich würde mich freuen, wenn Sie mir dabei helfen würden. Mit freundlichen Grüßen PV (Ein Fan Ihrer Office-Kurse)

Hallo Herr V.,

das habe ich gemacht :

* Mit Suchen und Ersetzen die Zeichenschaltung (Strg + J) durch einen Schrägstrich ersetzt.

* den Verbund aller verbundenen Zellen aufgehoben

* den Textumbruch entfernt

* mit einem AutoFilter in der Namensspalte den Text „Name“ und die leeren Zellen gefiltert und entfernt

* die leeren Spalten gelöscht.

Ick bin übrigens nur Single weil ick von Haus aus meine Mitmenschen durch meine enorme Attraktivität einschüchtere. Vermute ich zumindest.

Wie oft habe ich es schon gesagt: nicht verbinden! Das bringt nur Ärger!

Richtig: ich erhalte ein Formular mit mehreren verbundenen Zellen – hier: 2 x 2 Zellen sind verbunden.

Ich erstelle einen Verweis auf diese Zelle(n):

#ÜBERLAUF! ist die Folge. War ja klar …

Mein Mann macht jetzt Home-Office. Ich stelle fest: erstens: er kann sprechen. Zweitens: er kann nett sein!

Ich habe ja schon mehr als einmal über verbundene Zellen geschimpft. Ich tue es heute mal wieder!

Ich bin gestern beim VBA-Programmieren (mal wieder) über verbundene Zellen gestolpert. Ich muss wissen, wie viele Spalten die Liste hat (weil ich in Zeile 4 den Begriff „Summe“ suche).

Der Befehle
MsgBox ThisWorkbook.ActiveSheet.Range("A1").SpecialCells(xlCellTypeLastCell).Column
liefert 1!
Allerdings
MsgBox ThisWorkbook.ActiveSheet.Range("A1").CurrentRegion.Columns.Count
liefert 9! Ebenso:
MsgBox ThisWorkbook.ActiveSheet.UsedRange.Columns.Count

Keinen Humor haben, aber sich einen Account bei facebook zulegen. Man geht doch auch nicht zu Ikea, wenn man keine Teelichter braucht.

Boah ist das widerlich!!! *)

Ich erstelle ein Exceltabellenblatt, bei dem der Anwender zwischen zwei Texten wechseln kann. Je nach Text wird eine andere Liste für die Datenüberprüfung verwendet. Da die Liste dynamisch ist und aus einem anderen System kommt, muss ich ein paar Zeilen VBA-Code verwenden:

If Target.Value = „Für Standorte“ Or Target.Value = „Für Gebäude“ Then […]

Nach einer Weile meldet sich der Anwender und sagt, dass er auf diesem Tabellenblatt eine Fehlermeldung erhält. Ich schaue nach:

Das Gemeine: Der Anwender hat einen Doppelklick auf eine verbundene Zelle ausgeführt. Dadurch greift das Target-Objekt nicht – es nicht nun nicht mehr EINE Zelle, die einen Inhalt hat, sondern ein Zellbereich. Ich erhalte einen Fehler!

Also noch schnell eine Zeile Code außenrum – in der ersten Spalte wurde nichts verbunden.
If Target.Column = 1 Then
Und schon klappt es!

Wer nur die Hälfte weiß, spart 50 Prozent.

Und schon wieder bin ich reingefallen. Ich möchte in einem Excel-Formular per VBA eine Datenübrprüfung einfügen. Referenzspalte ist Spalte A. Steht dort kein Wert wird eine Datenüberprüfung generiert:

For j = 11 To ThisWorkbook.Worksheets(i).Range(„A1“).SpecialCells(xlCellTypeLastCell).Row
If ThisWorkbook.Worksheets(i).Range(„A“ & j).Value = „“ Then
‚ — Datenüberprüfung
End If
Next

Und natürlich erhalte ich einen Fehler: G36 ist „leer“ (weil verbunden mit G35), aber in G36 kann man keine Datenüberprüfung einschalten ( weil verbunden mit G35). Die Lösung: RAUS MIT DEN VERBUNDENEN ZELLEN:

Dann klappt es hervorragend.

Wenn mir langweilig ist, gehe ich in einem Bekleidungsgeschäft in eine Umkleidekabine und rufe: „Hey, hier ist kein Toilettenpapier!“

Ich programmiere ein Formular für einen Kunden. Einige Zellen sollen dynamische gesperrt oder entsperrt werden. Ich erhalte eine Fehlermeldung:

Seltsam: Der Befehl:

MsgBox Range(„K158“).Locked liefert False

Okay – noch ein Versuch:

Nutzt nichts! Ich schaue nach:

Ah! Verbundene Zellen. Ich darf nicht eine Zelle aus diesem Zellverbund sperren oder entsperren – dies funktioniert nur bei der ersten (hier: C158). Könnte mir Excel VBA ja auch sagen …

Ich muss nich immer im Mittelpunkt stehen … sitzen is auch okay

Schon perfide: Ich verbinde zwei Zellen miteinander („verbinden und zentrieren“). Ich speichere die Datei unter dem Namen „RenesTest.xlsx“. Ich verweise von einer anderen Datei auf die verbunden Zelle(n) und erhalte als Bezug:

=[RenesTest.xlsx]Tabelle1!$B$5

Ich speichere die Datei unter dem Namen „Test Rene.xlsx“. Erneut ein Bezug auf die verbundenen Zellen. Nun erhalte ich:

='[Test Rene.xlsx]Tabelle1′!$B$5:$C$5

was nach Bestätigung mit dem Fehler #WERT! quittiert wird. Erstaunlich, dass bei einem Leerzeichen im Dateiname der Bezug auf die verbunden Zellen aufgelöst wird, während bei einem Dateinamen ohne Leerzeichen der Bezug auf eine Zelle erfolgt!

Fazit: Besser nicht „verbinden und zentrieren!“ Das bringt nur Ärger!

Verbinden verboten!

Hallo Herr Martin,

ich weiß nicht, welches Walnusshirn die Gruppen zusammengefasst hat. Also warum ein Mensch die Zellen der ersten Spalte miteinander verbunden hat. So kann ich die Liste nicht sortieren und nicht filtern.  Egal – ich würde das schnell wieder rausmachen. Geht schnell? Ihr Lieblingssatz ist doch „zack – zack!“

Verbundene Zellen

Verbundene Zellen

Die Antwort: Ja. Markieren Sie das gesamte Tabellenblatt. Klicken Sie dann auf die Schaltfläche „Verbinden und zentrieren“. Dann sind alle verbundenen Zellen nicht mehr verbunden. Möglicherweise müssen Sie dann noch die Texte über alle Zellen hinunterziehen, beziehungsweise -kopieren.

VerbundeneZellen20151130_2

Zellverbund raus!

Zellverbund raus!

Für diese Aktion müssen alle verbundenen Zellen dieselbe Größe haben

Beim Sortieren erscheint eine „lustige“ Fehlermeldung statt dem Ergebnis der Sortierung.

Der Grund: einige der Zellen sind verbunden (hier: der Vorgesetzte). Dadurch werden aus mehreren Zellen jeweils eine Zelle. Diese kann nun nicht sortiert werden.

Die Lösung: Markieren Sie das gesamte Arbeitsblatt und heben mit einem Klick den Zellverbund aller Zellen wieder auf.

Sortieren funktioniert nicht.

Sortieren funktioniert nicht.