Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Datum en tijd toevoegen  (gelezen 384 keer)

0 leden en 1 gast bekijken dit topic.

Offline Jempje

  • Lid
  • *
  • Berichten: 42
  • Geslacht: Man
  • Wil veel bijleren !
Re: Datum en tijd toevoegen
« Reactie #15 Gepost op: 03 mei 2022, 20:18:24 »
Top, bedankt, ga topic afsluiten  \o/

Offline Jempje

  • Lid
  • *
  • Berichten: 42
  • Geslacht: Man
  • Wil veel bijleren !
Re: Datum en tijd toevoegen
« Reactie #16 Gepost op: 03 mei 2022, 20:19:42 »
Weet iemand hoe ik een topic moet zetten als opgelost?

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 19.301
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Datum en tijd toevoegen
« Reactie #17 Gepost op: 03 mei 2022, 20:22:17 »
Bedankt Jim  8)

Toch nog de vraag of [Time] niet gaat veranderen als het werkboek opnieuw wordt geopend?

PS: Formule werkt niet bij mij. En hij houd geen rekening dat de Datum-Tijd moet veranderen als er een nieuw nummer wordt ingegeven in C2.
Ook blijft de tijd staan, ook als er geen invoer staat in C2, of de bestaande invoer wordt verwijderd.


Jemje,

onder je topic vind je de knop "Topic opgelost"

:) SoftAid :)             
« Laatst bewerkt op: 03 mei 2022, 20:29:36 door SoftAid »
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline JEC

  • Ervaren lid
  • ***
  • Berichten: 329
Re: Datum en tijd toevoegen
« Reactie #18 Gepost op: 03 mei 2022, 20:47:38 »
Hi SoftAid,

Time vanuit VBA is een harde waarde. Dus die blijft staan.
Ik zou deze pakken als de cel ook weer leeg moet als er niets is ingevuld

Private Sub Worksheet_Change(ByVal Target As Range)
 Application.EnableEvents = False
 With Target
    If .Address(0, 0) = "C2" And .Value <> "" And IsNumeric(.Value) Then
       .Offset(, 10) = Time
    Else
       .Offset(, 10).Value = ""
    End If
 End With
 Application.EnableEvents = True
End Sub
« Laatst bewerkt op: 03 mei 2022, 20:54:56 door JEC »

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.200
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Datum en tijd toevoegen
« Reactie #19 Gepost op: 03 mei 2022, 22:06:38 »
...Als ik dan de file stuur en ze openen hem, wijzigt de tijd weer naar hun openingstijd van de file...

Wat is het doel van deze verzending? Ofwel, is het de bedoeling dat de ontvangers er nog verder iets in kunnen bewerken? Zo niet, sla 'm dan op als PDF en verstuur die.
______________________________

Groet, Leo

 


www.combell.com