Supportnet / Forum / Tabellenkalkulation

Hallo! Ich habe eine recht große Tabelle, bei der viele Zellen leer sind. In jedes soll ein zentrierter Punkt eingefügt werden. Gibt es einen Befehl wie:"Mach in jede leere Zelle das und das"? Das würde mir viel Zeit ersparen. Vielen Dank und liebe Grüße Kerstin Datz

Hallo Kerstin,

mit einem Makro wäre das möglich.
Z.B. Tabelle markieren und dieses MAkro laufen lassen:

Sub test()
  Dim cell As Range
  For Each cell In Selection.Cells
    If cell.Value = "" Then cell.Value = "zentrierter Punkt"
  Next cell
End Sub

Falls Du Dich mit Makros nicht auskennst, dann gibt es bei den Antworten von coros sehr gute Anleitungen, wie das eingegeben wird.

"zentrierter Punkt" verstehe ich nicht so ganz, vielleicht geht es mit einem ascii-Zeichen.

Gruß
Günter

Moin an Euch beiden!

Ich greife Dir mal unter die Arme Günther. Kerstin meint glaube ich nicht den Text "zentrierter Punkt", sondern einen zentriert ausgerichteten Punkt (.). Ich habe Dein Makro mal etwas abgeändert. Das setzt in jede leere Zelle diesen zentrierten Punkt.

@Kerstin: Das nachfolgende Makro musst Du in ein StandardModul kopieren.

Sub test()
Application.ScreenUpdating = False
  Dim cell As Range
  For Each cell In Selection.Cells
    If cell.Value = "" Then cell.Value = "."
    cell.Select
        With Selection
        .HorizontalAlignment = xlCenter
    End With

  Next cell
End Sub

Und hier kommt nun die von Günther gelobte Anleitung zum Einfügen eines Makro. An dieser Stelle noch mal Danke an Günther für die Blumen. ;-)

1. Markiere die Anweisung aus diesem Beitrag und Kopiere (Strg c) diesen.

2. Klicke in Deiner Exceldatei in der Menüleiste nacheinander auf Extras => Makro => Visual Basic Editor oder drücke die Tastenkombination Alt F11

3. In dem neu geöffneten Fenster suche auf der linken Seite nach dem Eintrag VBA Projekt(Hier der Name Deiner Tabelle) und klicke doppelt auf diesen Eintrag

4. Klicke danach nacheinander in der Menüleiste auf Einfügen => Modul.

5. Füge nun die vorher kopierte Anweisung in das rechte leere Fenster ein.

Aufrufen kann man ein solches Makro über eine Befehlsschaltfläche. Da ich nicht weiß, ob Du weißt, wie man eine Befehlsschaltfläche in ein Tabellenblatt einfügst, kommt hier eine kurze Anweisung.

1. Gehe in der Menüleiste auf Ansicht => Symbolleiste => Steuerelement-Toolbox

2. Klicke auf die 6.Schaltfläche von links (Schaltflächenkommentar: Befehlsschaltfläche)

3. Positioniere die Schaltfläche in Deinem Tabellenblatt und passe gegebenenfalls die Größe an.

4. Klicke in der Symbolleiste auf die 3.Schaltfläche von links (Schaltflächenkommentar: Code anzeigen).

5. In das geöffnete Fenster schreibst Du zwischen die Texte “Private Sub CommandButton1_Click()“ und “End Sub“ in die Leerzeile Call Makroname oder nur der Makroname.

6. Klicke in der Symbolleiste auf die erste Schaltfläche von links um den Entwurfmodus zu beenden (Schaltflächenkommentar: Entwurfmodus beenden).

Wenn Du alles richtig gemacht hast, sollte das Makro, nachdem Du die Schaltfläche betätigt hast, abgearbeitet werden.

Du solltest zum Abschluss noch die Sicherheitseinstellung, die beim Öffnen der Datei abgefragt wird, kontrollieren. Klicke dazu nacheinander in der Menüleiste wieder auf Extras => Makro und dann auf Sicherheit.... Gehe, falls nicht schon angezeigt, auf die Registerkarte Sicherheitsstufe und schaue dort nach, ob die Einstellung Mittel aktiviert ist. Wenn nicht, aktiviere diese Einstellung, da sonst der Code nicht ausgeführt werden kann. Beim nächsten Öffnen Deiner Datei kommt eine Abfrage, ob Makros aktiviert oder deaktiviert werden sollen. Klicke auf aktivieren und der Code wird ausgeführt.

Ich hoffe, Du kommst klar. Wenn nicht, dann melde Dich noch mal.

MfG,
coros
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein}
^{Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Hallo Kerstin,

über einen kleinen Umweg geht das auch ganz ohne VBA:
Schreibe in eine beliebige Zelle ausserhalb deines Datenbereichs eine 0 (NULL), markiere diese NUll, dann KOPIEREN, dann deinen gesamten Datenbereich markieren, in dem die leeren Zellen mit dem Punkt versehen werden sollen, dann BEARBEITEN-INHALTE EINFÜGEN-OPERATION-ADDIEREN.
Dann steht in allen bisher leeren Zellen ein 0 (NULL), in den Zellen mit Wertn bleibt der bisherige Wert unverändert (es wurde ja nur eine 0 addiert) und die Texte sind ebenfalls von dieser Aktion nicht betroffen.
Dann ganz einfach ERSETZEN - 0 durch . und fertig!

CU
want2cu

JUHUUUUUU!!!

Hat geklappt!!!
Vielen, vielen, vielen lieben Dank an euch alle 3! Ich hab zuerst die light-Variante von want2cu probiert (die ging) und dann hab ich noch die Makro-Variante von coros probiert und es sogar geschafft, dass auch hier überall Punkte waren!!!
Ich fühl mich jetzt richtig gut: Überall Punkte und chefmäßig was mit Makros gemacht... :-))

Find ich super, dass Leute wie ihr, die sich auskennen, anderen einfach so helfen! Ihr seid spitze!!!

Liebe Grüße

Kerstin

Nabend Kerstin,

na das ist ja prima, dass alles geklappt hat. Danke Dir auch für die chefmäßige Rückmeldung. ;-)

MfG,
coros
^{Jeder macht was er will, keiner macht was er soll, aber alle machen mit.}

na, is doch selbstverständlich!!

Schönen Abend noch!

VG

Kerstin

Äh... ich will ja mein Glück jetzt nicht ausreizen.. aber wenn ich mal jemanden erwische der sich auskennt:
Wie bekomm ich denn ein Plus in eine Zelle, ohne dass das liebe Programm gleich was addieren will?
Also am Ende soll da nur ein Plus stehen.

Weißt du da was?

LG

Kerstin

Hallo Kerstin
einfach die betr. Zelle mit Rechtsklick markieren und unter Zellen formatieren Format Text auswählen.

Gruß Hansjörg

Das hab ich schon probiert, aber wer will trotzdem was addieren :(

Nabend Kerstin,

der Tip von Hansjörg sollte schon funktionieren. Warum das bei Dir nicht so ist, weiß ich jetzt auch nicht. Aber gebe doch einfach mal ein Leerzeichen und dann das Pluszeichen ein. Das sollte zumindestens funktionieren.

MfG,
coros
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein}
^{Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Hallo Kerstin,

habe es auch nochmal versucht. Das mit Format Text geht nur mit Bestätigung der Entertaste.
Wird vorher in eine andere Zelle geklickt, will Excel diese addieren.

Gruß Hansjörg

Hallo!

Es geht sowohl mit Leerzeichen vorher als auch mit der Entertaste danach.

Nochmals vielen Dank + Gute Nacht


VG
Kerstin

Hallo Kerstin,
auch mit einem "Hochkomma" (das ist das Teil auf der #-Taste) geht das.

CU
want2cu

• Zellen formatieren ( Zellen verbinden )
• Ausfüllen mit Increment 7 (anstatt defalt 1)
• Zeichen in Zellen zählen und ggf. Zellen löschen
• auto ausfüllen
• Ausfüllen automatisch