Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 14:03:38
Http-Request (POST) für GraphQL API-Abfrage
20.04.2024 08:56:18
Textbox in Tabellenblatt ohne Bestätigung in Zelle eintragen
20.04.2024 07:57:54
Tablle fürs E-Auto - Preis wenn kürzer als 60 Min Ladezeit
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
808to812
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
808to812
808to812
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Text in Zelle per VB durchstreichen & be...

Text in Zelle per VB durchstreichen & be...
09.10.2006 12:15:38
Klaus
stimmte Zellen dann auf Null setzen?
Hallo allerseits, habe heute mal wieder ein Frage an die geschätzten Experten!
Ich versuche in VB einen bestimmten Ablauf per Button zu automatisieren. Es soll eine von mir per Cursor selektierte Zelle(die Zelle ist mit Text gefüllt), wie z.B. "A1" per Button durchgestrichen werden. Dann sollen die Zellen "A2" bis "A5" mit dem Wert "0" gefüllt, und die Zellen "A6" bis "A8" mit dem Wert "1" gefüllt werden (A2 bis A8 sind einfache Zahlenzellen).
Das wars...
Danke & Mfg,
Klaus

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text in Zelle per VB durchstreichen & be...
09.10.2006 12:24:32
Ossburn
Hallo Klaus!
Das ist die Lösung:

Sub CommandButton1_Click()
Range("A1").Font.Strikethrough = True
Range("A2:A5").Value = 0
Range("A6:A8").Value = 1
End Sub

Grüße
Ossburn
AW: Muss noch erweitert werden...
09.10.2006 13:58:14
Klaus
Danke soweit, das ist schon gut. Wieder was gelernt.
Aber, leider muss ich das ganze doch noch ein wenig ändern und erweitern.
Wie kann man es so abändern, das automatisch die Zeile erkannt wird, und dann die entsprechenden Zellen rechts daneben ändern?
Also, wenn der Cursor bei "A1" steht, sollen (ähnlich wie oben gehabt) die Zellen "B1" bis "C1" auf "0" geändert, und bei "D1" bis "E1" auf "1" geändert werden.
Aber wenn ich mit dem Cursor z.B. in die Zeile 5 gehe, also "A5", dann soll er das ganze bei "B5" bis "C5" mit "0" füllen, und bei "D5" bis "E5" mit "1".
Es soll also immer Cursor-abhängig in der Spalte A sein. Je nachdem wo der Cursor sich aufhält, werden die Zellen rechts daneben geändert. Es muss irgendwie die Position ermittelt werden...?
Gruß,
klaus
Anzeige
AW: Muss noch erweitert werden...
11.10.2006 16:20:51
Bertram
Hallo Klaus,
etwa so (funktioniert nur, wenn EINE Zelle markiert ist. Die muss nur in der richtigen Zeile sein, nicht in unbedingt in Spalte A):

Private Sub CommandButton1_Click()
Dim Zeile As Long
Zeile = Selection.Row
Cells(Zeile, 1).Font.Strikethrough = True
Range(Cells(Zeile, 2), Cells(Zeile, 3)).Value = 0
Range(Cells(Zeile, 4), Cells(Zeile, 5)).Value = 1
End Sub

Gruß
Bertram

300 Forumthreads zu ähnlichen Themen

Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Anzeige
Textteile in Zellen mit Liste vergleichen
susidimarca

Hallo,
ich habe derzeit ein kniffeliges Excelproblem.
ich möchte gerne den Text in Zellen
hjgshgjdf Kriterium2 kjhfkjhfksdjhf
dskj Kriterium1 ajdhasjdhakjdhakdhajkdhajkdakj
daudzauizdaiudzaidzaisdz Kriterium3 kajhdasks
mit den Kriterium eine anderen Tabelle vergleichen...
21.08.2008 10:05:00
Thread-ID: 1003378
6 Beiträge
Wenn nur Text in Zelle...
MichiM

Hallo,
ich habe eine umfangreiche Artikelliste (ca. 250.000 Artikel) aus einer Datanormdatei erstellt.
Aus dieser muss ich jetzt alle Artikel entfernen, dessen Artikelnummer (in Spalte A; als Text formatiert, damit führende Nullen nicht gelöscht werden) keinerlei Zahlen enthalten.
E...
22.08.2008 16:24:44
Thread-ID: 1003960
4 Beiträge
Anzeige
Zelleninhalt (Text) in 2 Spalten teilen
El.

Hallo!
Habe eine Spalte in der Artikelname und Artikelmerkmale, durch drei Punkte getrennt "...", zusammen stehen. Beispiel: Lecker Whisky 21 Jahre ... Lieferung in hochwertiger Schatulle
Wie krieg ich nun den Text links der Punkte in eine extra Spalte und rechts der Punkte in eine extr...
03.09.2008 16:35:00
Thread-ID: 1007155
4 Beiträge
Text verbinden und den Inhalt der Zelle ausgeben
Jörg

Hallo,
ich benötige etwas Hilfe, vermutlich für euch kein Problem:
in Zelle A1 möchte ich den Spaltenbuchstaben eintragen
in Zelle A2 möchte ich eine Zeilennummer eintragen
in Zelle A3 fehlt mir nun die Formel, mit der ich A1undA2 verbinden kann UND dann den Inhalt der Zelle aus...
19.09.2008 11:42:31
Thread-ID: 1010969
6 Beiträge
Textinhalte aus Zellen zusammenkopieren
zehetner

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
21.09.2008 18:29:25
Thread-ID: 1011343
2 Beiträge
Zelle auf Inhalt Text oder Zahl prüfen
Moritz

Hallo,
ich habe eine sehr große Tabelle mit Adressen. Problem ist nur, dass die Straßen, PLZ und so nicht untereinander in einer Spalte stehen sondern alle unterschiedlich verrückt sind je nachdem wie viele Vorname oder Nachnamen jemand hat. Es gibt aber ein einheitliches System. Erst kommt...
30.09.2008 10:36:00
Thread-ID: 1013287
3 Beiträge
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
4
5
3
9
3
5
1
2
1
6
4
1
4
6
1
5
11
22
7
4
3
18
2
3