Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

automatisch Änderungsdatum setzen

Frage Entwicklung VB for Applications

Mitglied: CJackson

CJackson (Level 1) - Jetzt verbinden

14.01.2008, aktualisiert 11:54 Uhr, 4441 Aufrufe, 3 Kommentare

Hallo,
lass mir das Änderungsdatum in das Feld (E5) schreiben.
Sollte nun einen Quelltext haben, der automatisch dabei den Benutzernamen in das Feld (E6) einträgt.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Cells([5], [5]) = CDate(Now)


End Sub

mfg CJACKSON
Mitglied: bastla
14.01.2008 um 11:46 Uhr
Hallo CJackson!

Dies schreibt mri das Änderungsdatum dann aber in Row 5.
Gemeint ist vermutlich "Column 5" ...

Ersetze einfach "Target.Row" (womit die Zeile, in welcher sich die veränderte Zelle befindet, gemeint ist) durch die gewünschte konstante Zeilennummer, also 5.

Grüße
bastla

[Edit] Beim Verfassen der Antwort passte sie noch zur Frage ... [Edit]
Bitte warten ..
Mitglied: bastla
14.01.2008 um 11:51 Uhr
Hallo CJackson!

Neuer Versuch:
01.
Private Sub Worksheet_Change(ByVal Target As Range) 
02.
Application.EnableEvents = False 
03.
Cells(5, 5) = CDate(Now) 
04.
Cells(5, 6) = CreateObject("WScript.Network").UserName 
05.
Application.EnableEvents = True 
06.
End Sub
Grüße
bastla
Bitte warten ..
Mitglied: CJackson
14.01.2008 um 11:54 Uhr
Danke für die schnelle Hilfe, war erfolgreich.
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Powershell: Netzwerk-Einstellung auf automatisch setzen (3)

Frage von 121747 zum Thema Batch & Shell ...

Batch & Shell
gelöst Dateien in Ordner verschiebenm abhängig vom Jahr des Änderungsdatums (11)

Frage von freakonaleash zum Thema Batch & Shell ...

VB for Applications
gelöst Excel - VBA: Automatisches Setzen von Kommentaren in eine Zelle (3)

Frage von d4shoerncheN zum Thema VB for Applications ...

Neue Wissensbeiträge
Sicherheit

Millionen Euro in den Sand gesetzt?

(3)

Information von transocean zum Thema Sicherheit ...

Sicherheit

How I hacked hundreds of companies through their helpdesk

Information von SeaStorm zum Thema Sicherheit ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
Eine Netzwerkdose im Wechsel für zwei unterschiedliche Netze (12)

Frage von kartoffelesser zum Thema LAN, WAN, Wireless ...

Windows Server
ESXI Free Windows Server 2016 Datacenter aktivieren (11)

Frage von iDeathz zum Thema Windows Server ...

Netzwerke
Mobile Einwahl IPSec VPN von iPhone iPad T-Mobile zur Pfsense (10)

Frage von Spitzbube zum Thema Netzwerke ...

Voice over IP
SNOM D765 an LancomR883VAW (10)

Frage von MS6800 zum Thema Voice over IP ...