Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
356to360
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
356to360
356to360
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Beim Anklicken sollte ein Kreuz erscheinen

Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 06:16:38
Caroline
Hallo zusammen

Habe ein Problem in einem Formular. Möchte dass wenn man ein Feld
anklickt, dass dort gleich ein Kreuz erscheint. (Muss bei mehreren Feldern
sein!)
Habe das Feld mit dem Häckchen gefunden, ist aber in unserem Formular
nicht brauchbar, da es viel zu klein ist.
Kann mir da jemand helfen. Ist dies überhaupt machbar.

Besten Dank zum Voraus für Eure Hilfe.

Gruss Caroline

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 06:51:30
AndreasS
Hallo,
meinst du eine Zelle?
Gruß
AW: Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 07:10:23
Caroline
Hallo Andreas

Also ich habe eine Zelle eingerahm als Vierreck. Und bei
diesen eingerahmten Zellen sollte ich ein Makro zuweisen können, damit
wenn dort jemand anklickt automatisch ein Kreuz erschein.
(Grund ist ein sehr grosses Formular mit ca. 50 solcher Felder, und diese
Felder muss dann ein Mitarbeiter jeweils mit einem Kreuz JA oder NEIN ausfüllen.)
Daher möchte ich den Aufwand verringern indem man diese Felder nur
anzuklicken braucht.

Gruss Caroline
AW: Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 07:16:40
AndreasS
Hallo,
diese Makro gehört zum Tabellenblatt, wo das "X" erscheinen soll:


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Target = "X"
Cancel = True
End Sub


Gruß
Anzeige
AW: Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 07:34:32
AndreasS
Hallo,
wenn deine Felder alle in einer Spalte stehen(Bsp. für Spalte C):


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 3 Then
Target = "X"
Cancel = True
Else
Exit Sub
End If
End Sub


Gruß
Andreas
AW: Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 08:12:40
Caroline
Hallo Andreas

Kann ich dieses Makro kopieren und ganz normal als Makro in
dem Tabellenblatt als Makro einfügen wo ich es brauche.
Habe es nämlich probiert und dann einem Feld zugewiesen, aber
es funktioniert nicht.
Muss ich noch etwas abändern am Makro?

Besten Dank im Voraus für Deine Hilfe
Gruss Caroline
Anzeige
AW: Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 08:28:50
Carsten
Hallo Caroline,

entschuldige wenn ich mich einmische.

Der Code gehört in die Tabelle (Rechtsklick auf Tabellenregister => Code anzeigen und dann im rechten Fenster einfügen).
Wenn Du das gemacht hast, erscheint in jeder Zelle des Blattes in die Du einen Doppelklick machst ein "X". Beim zweiten Code den Andreas gepostet hat ist der Bereich in dem das "X" bei einem Doppelklick erscheint auf Spalte C beschränkt.

Anbei noch ein Makro von Hajo. Hier ist pro Zeile nur ein "x" möglich, d.h. es kann nicht vorkommen, dass ja und nein gleichzeitig gewählt werden.


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim BoVorhanden As Boolean
ActiveSheet.Unprotect
If Target.Column < 5 And Target.Column > 3 And Target.Row < 20 And Target.Row > 5 Then
BoVorhanden = Target.Value = "x"
Cancel = True
Range("D" & Target.Row & ":AC" & Target.Row).Cells = ""
If BoVorhanden = False Then Target.Cells = "x"
ActiveSheet.Protect
End If
End Sub


Den Klick-Bereich mußt Du natürlich noch anpassen.

Gruß
Carsten
Anzeige
AW: Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 08:37:54
Caroline
Hallo Carsten

Vielen Dank. Jetzt habe ich es "gecheckt".
Wusste gar nicht dass mann einen Code auf eine Tabelle bezogen hinterlegen kann.
Daher bin ich nicht nach gekommen.
Habe nun wieder was gelernt.

Vielen Dank für Eure Hilfe.

Caroline
AW: Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 08:34:15
AndreasS
Hallo,
rechtsklick auf den Tabellennamen, dann Code anzeigen auswählen. Hier den Code reinkopieren.
In welche Zellen soll denn das "X" eingetragen werden? Könnte dir dann ein Bsp. geben...
Gruß
AW: Beim Anklicken sollte ein Kreuz erscheinen
07.01.2004 08:23:56
Hajo_Zi
Hallo Caroline

schaue mal auf meine Homepage da ist ein Beispiel, auf der Seite VBA (Kreuz in Zelle).

Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro


Anzeige

51 Forumthreads zu ähnlichen Themen

Zellen mit Farbe füllen
Karsten

Hallo,
ich möchte, wenn in der aktiven Zelle "Montag" steht, dass sie und die linken 11 Zellen sich mit Farbe 38 füllen. Steht Dienstag, dann dasselbe, nur mi Farbe 8.
Kann mir da jemand mit dem richtigen Befehl weiterhelfen?
Gruß
Karsten
25.07.2009 15:05:43
Thread-ID: 1091238
18 Beiträge
Anzeige
Zellen automatisch mit Zalen ausfüllen lassen
Rüdiger

Hallo,
ich möchte bei einer Arbeitsmappe, in der ich ein Häkelmuster eingesetzt habe die leeren Kästchen mit fortlaufenden Zahlen füllen lassen. Im Moment mache ich das per Hand!
In der untersten Zeile fängt die Zahl 1 an der rechten Seite anfangen und fortlaufend bis zum nächsten "X" i...
12.11.2009 17:42:37
Thread-ID: 1116623
18 Beiträge
Zellen mit Daten befüllen
leo


Hallo ich habe noch ein Problem bei welchen ich eure Hilfe brauche.
Ich habe ein Formular, in welches Daten in verschiedene Felder an verschiedenen Positionen geschrieben werden sollen.
Musterdatei anbei die Daten rechts JAHR, NAME, STR und X sollen in das Formular
JAHR soll ne...
17.12.2009 13:15:44
Thread-ID: 1124397
2 Beiträge
Anzeige
Zelle mit Text befüllen, wenn andere Zelle gefüllt
Gussfuss

Hallo liebe Forumler,
hoffe, ihr könnt mir mal wieder helfen...
ich bin fast fertig, jetzt hakt es nur noch an einer Kleinigkeit.
die Aufgabe soll lauten:
prüfe von unten nach oben in einer Schleife, ob jeweilige Zelle in Spalte F gefüllt ist, wenn ja befülle das jeweilge Feld i...
21.07.2011 15:13:10
Thread-ID: 1223072
3 Beiträge
Per VBA bestimmte Zellen mit Formel Füllen
Benjamin

Hallo
ich habe das Probelm, dass ich bestimmte Zellen in mehreren Dokumenten habe, in denen die Formel geändert werden muss.
nun wollte ich wissen, ob dies Mittels VBA geht wenn die reihen folge wie folg t ist
A9 sowie W9
A130 W130
....
07.12.2011 17:37:37
Thread-ID: 1240992
3 Beiträge
Zellen in Spalten einzeln mit Formeln füllen
Werner

Hallo,
ich habe eine Tabelle (viele Datensätze), die in einigen Spalten mit Matrixformeln berechnet wird. Dementsprechend lange dauert es dann, wenn eine Neuberechnung anbeschubst wird.
Deswegen dachte ich, man könnte die Formeln jeweils nur um eine Zelle nach unten "ziehen" und dann...
11.02.2012 22:24:18
Thread-ID: 1250220
5 Beiträge
definierte Zellen mit Daten füllen und drucken
Christian

Hallo,
ich hab hier ein kleines Problem, und zwar hab ich eine Excel Vorlage, in der fortlaufende Zahlen aus einer anderen Tabelle eingefügt werden sollen. Die Zellen in der Vorlage sind E1, E17, E34, E51.
Die Werte sollen aus einer Tabelle eingefügt, dann ausgedruckt und anschließend...
23.08.2012 07:27:26
Thread-ID: 1275967
3 Beiträge
gefärbte Zellen mit Zeichen füllen
Det

Hallo zusammen, ich möchte in mehere Bereiche eines Arbeitsblattes gefärbte Zellen mit einem "-" füllen, dabei ist es egal mit welcher Farbe die Zelle eingefärbt ist. Bin für jede Hilfe dankbar. Gruß Det
28.02.2013 17:15:22
Thread-ID: 1301573
11 Beiträge

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
17
12
17
1
2
2
2
4
2
10
3
5
4
3
11
4
1
2
1
1
1
1
1
1
10