Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1248to1252
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
1248to1252
1248to1252
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datenerfassung mit Username in Zelle

Datenerfassung mit Username in Zelle
Werner
Hallo!
Viele User sollen in einer Datei Mängel festhalten.
In Spalte A wird dabei in der nächsten freien Zeile ein Wert eingegeben.
Ich möchte, dass nach der Eingabe von Daten in Spalte A der Username in Spalte L (gleiche Zeile) erscheint.
Wird der Wert in Spalte A wieder gelöscht soll auch der Username verschwinden.
Geht das?`
Gruß und Danke
Werner

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Datenerfassung mit Username in Zelle
15.02.2012 17:43:15
Hajo_Zi
Hallo Werner,
ja das geht per VBA.

AW: Datenerfassung mit Username in Zelle
15.02.2012 17:44:29
Werner
Und wie?
Gruß
Werner
AW: Datenerfassung mit Username in Zelle
15.02.2012 17:50:26
Hajo_Zi
Hallo Werner,
hätte man das nich gleich im ersten Beitrag Fragen können. Da war nur die Frage ob es geht.
Unter der Tabelle 
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
If Target  "" Then
Cells(Target.Row, 12) = Environ("username")
Else
Cells(Target.Row, 12) = ""
End If
End If
End Sub

Gruß Hajo
Anzeige
AW: Datenerfassung mit Username in Zelle
15.02.2012 20:19:13
Peter
Hallo Hajo
Wie muss der Code angepasst werden, wenn Bereich A3:A37 selektiert ist, damit bei Einträgen innerhalb dieses Bereichs der Code auch funktioniert?
Gruss, Peter
dann frag auch noch die Zeilen ab ...
15.02.2012 23:44:53
Matthias
Hallo Peter
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Row > 2 And Target.Row Then
If Target  "" Then
Cells(Target.Row, 12) = Environ("username")
Else
Cells(Target.Row, 12) = ""
End If
End If
End Sub
Gruß Matthias
AW: Datenerfassung mit Username in Zelle
15.02.2012 23:55:49
fcs
Hallo Peter,
im Prinzip funktioniert es so: 
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Zelle As Range
If Target.Column = 1 And Target.Columns.Count = 1 Then
For Each Zelle In Target
If Zelle  "" Then
Cells(Zelle.Row, 12) = Environ("username")
Else
Cells(Zelle.Row, 12) = ""
End If
Next
End If
End Sub

Falls du den Eingabebereich in Spalte A auf die Zeilen 3 bis 37 einschränken willst, dann muss die Prüfung für den Zellbereich von Target angepasst werden. 
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Zelle As Range
If Not Intersect(Target, Range("A3:A37")) Is Nothing Then
For Each Zelle In Intersect(Target, Range("A3:A37"))
If Zelle  "" Then
Cells(Zelle.Row, 12) = Environ("username")
Else
Cells(Zelle.Row, 12) = ""
End If
Next
End If
End Sub

Gruß
Franz
Anzeige
AW: Datenerfassung mit Username in Zelle
16.02.2012 07:29:38
Peter
Hallo
Vielen Dank für die Antworten.
Die Codes von Franz funktionieren tiptop.
Gruss, Peter

327 Forumthreads zu ähnlichen Themen

Inhalt einer Zelle im Windows Infobereich anzeigen
Thomas

Hallo,
kann ich den Inhalt einer Zelle im Windows Infobereich anzeigen lassen?
Ich habe eine VBA-Anwendung, die mir den Verarbeitungsstatus in einer Zelle anzeigt.
Weil die Verarbeitung sehr lange dauert möchte ich zwischendurch mit anderen Anwendungen arbeiten und unten rechts nebe...
27.08.2008 17:50:23
Thread-ID: 1005163
3 Beiträge
Anzeige
Syntax für benutzerdefiniertes Zellenformat
BF

Hallo Forum,
kennt jemand eine kurze Beschreibung im Internet zur Syntax des benutzerdefinierten Zellenformats (Zellen formatieren - Zahlen - Benutzerdefiniert - Typ)?
Ich möchte jetzt z.B. statt einer Null einen Strich anzeigen...
Eine allgemeine Anleitung wäre klasse, da ich schon...
04.10.2008 16:17:00
Thread-ID: 1014157
3 Beiträge
Kommenare beim Klick in die leere Zelle anzeigen?
Selma

Hallo Leute,
ich möchte in Zellen der Spalte E und Spalte F die Kommmentare als errechnete Werte beim Klick in die Zelle anzeigen, wenn diese Zelle leer sind. Sind die Zelle gefüllt, dann soll der Kommentar nicht angezeigt werden.
Die Voraussetzung ist, dass in Zelle der Spalte D die Za...
11.10.2008 12:17:00
Thread-ID: 1015730
8 Beiträge
Anzeige
Zahl 1 bis 7 nur in Zelle eintragen dürfen
Korl

Hallo,
ich möchte in einem Zellbereich z.B. "B7:BI103" in den jeweiligen Zellen nur die Zahlen von "1 bis"7 eintragen dürfen und sofort den Cursor in der jeweiligen Zeile um eine Zelle nach rechts setzen lassen ohne "Enter" tippen zu müssen.
Den Bereich könnte ich mit Gültigkeitskriteri...
17.11.2008 19:55:00
Thread-ID: 1025380
8 Beiträge
Benutzername Datum Zeit in Zelle
Michael

Hallo zusammen,
ich suche nach einem Makro, das einen Benutzernamen aus Tabelle1 Zelle B2, das aktuelle Datum (JJJJ.MM.TT) und die Zeit der Änderung Zeit (hh:mm:ss) bei Änderungen in einer Zeile der Spalten A bis AT in die Zelle AU2 usw. schreibt.
Die Suche hat mich leider nicht weiterg...
27.12.2008 19:52:00
Thread-ID: 1035469
15 Beiträge
Benutzername Datum Zeit in Zelle
Micha

Hallo zusammen,
am 29.12.2008 hat mir Peter Feustel bei einem Problem geholfen. Klappte auch alles wunderbar.
Archiv: https://www.herber.de/forum/archiv/1032to1036/t1035469.htm
(vom Archiv aus kann man Beiträge wohl nicht mehr als "Beitrag offen" setzen?!)
Nun macht das Makro "S...
25.01.2009 19:19:50
Thread-ID: 1043657
9 Beiträge
knifflig: in einer Zelle anzeigen, ob Makros aktiv
Tobias

Gibts ne Möglichkeit, in einer Zelle den "makrostatus" abzufragen.
Ohne VBA natürlich :)
So eine WAHR/FALSCH ausgabe wär praktisch,
da ich den Anfängern, die die Mappe öffnen, einen deutlichen Hinweis darauf geben möchte,
das sie Ohne aktiviertem VBA nicht funktioniert...
I...
20.02.2009 16:47:00
Thread-ID: 1052499
6 Beiträge
Lange Matrixformel mittels VBA in Zelle eintragen
hoffi

Hallo zusammen,
auch nach einer längeren Internetrecherche konnte ich folgendes Problem leider nicht lösen.
Ich möchte in Excel 2003 mittels VBA eine Matrixformel in eine Zelle schreiben lassen. Der Programmiercode sieht vereinfacht so aus:
A = "=sum(if(XXX,YYY,ZZZ))"
Cells(1,1)...
25.03.2009 13:09:25
Thread-ID: 1063729
5 Beiträge
Anzeige

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
2
2
7
10
7
14
8
5
4
4
8
5
10
2
3
2
1
2
2
8
5
2
2
2