Help!

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

Hulp bij posten

Recente topics

Auteur Topic: Invoer diverse unieke cellen = diverse unieke registraties invoertijdstip  (gelezen 31096 keer)

0 leden en 2 gasten bekijken dit topic.

Offline deevvvv

  • Nieuw lid
  • Berichten: 5
  • Oplossing.be
Hallo,

Ik zit met het volgende. Ik heb een afvinklijst in de volgende rijen b2:b7,c2:c7. nu wil ik in een tweede tabblad een tijdsregistratie van het tijdstip dat een cel is afgevinkt. ik heb al een scriptje uit een ander topic om registratie b2 te laten registreren in het tabblad tijdsregistratie.Dit werkt. vanaf hier hang ik vast. het lukt me niet om voor elke cel een unieke registratie te laten plaatsvinden. Ofwel krijg ik geen registratie of alle registraties hebben dezelfde datum. Hoop dat ik mijn probleem helder heb uitgelegd. Groet Deevvv

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.129
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Invoer diverse unieke cellen = diverse unieke registraties invoertijdstip
« Reactie #1 Gepost op: 23 september 2019, 20:38:19 »
Hallo deevvvv,

Welkom op Oplossing.be  :)

We helpen graag, maar we werken liefst aan een toegevoegd voorbeeldbestandje...

Kan je zo een bestandje aanmaken en aanhangen als bijlage.

Groeten,

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
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 deevvvv

  • Nieuw lid
  • Berichten: 5
  • Oplossing.be
Re: Invoer diverse unieke cellen = diverse unieke registraties invoertijdstip
« Reactie #2 Gepost op: 23 september 2019, 20:53:43 »
Dank je voor je reactie. Heb ff snel de situatie nagemaakt. Graag wil ik weten hoe ik de tijdstippen in de andere cellen krijg.

Groet Deevvv

Offline emields

  • Ervaren lid
  • ***
  • Berichten: 257
  • Geslacht: Man
  • Oplossing.be
Re: Invoer diverse unieke cellen = diverse unieke registraties invoertijdstip
« Reactie #3 Gepost op: 23 september 2019, 21:39:06 »
bedoel je zoiets?

Offline deevvvv

  • Nieuw lid
  • Berichten: 5
  • Oplossing.be
Re: Invoer diverse unieke cellen = diverse unieke registraties invoertijdstip
« Reactie #4 Gepost op: 13 oktober 2019, 16:40:16 »
Ik krijg het probleem niet opgelost. zoals je ziet in de bijlage komt bij invoer a2 een melding in E2. Bij een mutatie in A2 komt de mutatietijd in F2. Het lukt mij echter niet om bij input in B2 een timestamp in G2 te krijgen. Ik heb met mijn beperkte kennis in de VBA liggen rommelen maar ik kwam er niet uit. Hopelijk kan iemand helpen.

Groet David

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.129
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Invoer diverse unieke cellen = diverse unieke registraties invoertijdstip
« Reactie #5 Gepost op: 13 oktober 2019, 17:43:17 »
Hallo David,

je bijgevoegd voorbeeld wijkt volledig af van de code die emields je heeft gegeven, en je vraagstelling is anders...

ik reageer dus enkel op je laatste vraag & voorbeeldbestandje.

Private Sub Worksheet_Change(ByVal Target As Range)

Dim myTableRange As Range
Dim myDateTimeRange As Range
Dim myUpdateRange As Range

Set myTableRange = Range("A2:D10")
x = Target.Column   'nieuw
If Intersect(Target, myTableRange) Is Nothing Then Exit Sub

Set myDateTimeRange = Cells(Target.Row, (x + 4))  'aangepast
Set myUpdatedRange = Cells(Target.Row, (x + 4))    'aangepast

If myDateTimeRange.Value = "" Then
    myDateTimeRange.Value = Now

End If

myUpdatedRange.Value = Now

End Sub

Wees zo duidelijk mogelijk bij het antwoorden en vragen stellen.

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
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 deevvvv

  • Nieuw lid
  • Berichten: 5
  • Oplossing.be
Re: Invoer diverse unieke cellen = diverse unieke registraties invoertijdstip
« Reactie #6 Gepost op: 13 oktober 2019, 18:31:15 »
Dank je voor je snelle reactie. Mijn belangrijkste probleem heb je opgelost. In het voorbeeld bestand heb ik echter 2 kolommen voor de timestamp. de eerste voor de creatie datum de tweede voor eventuele mutaties. Middels je oplossing lukt het me de creatie timestamp te plaatsen. De mutatiedatum zie ik echter niet meer. Zou dat ook nog mogelijk zijn?

Groet David

Offline deevvvv

  • Nieuw lid
  • Berichten: 5
  • Oplossing.be
Re: Invoer diverse unieke cellen = diverse unieke registraties invoertijdstip
« Reactie #7 Gepost op: 13 oktober 2019, 18:43:26 »
Het is me al gelukt  :thumbsup: :thumbsup:
Set myDateTimeRange = Cells(Target.Row, (x + 4))
Set myUpdatedRange = Cells(Target.Row, (x + 9))

 O-O

Merci

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.129
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Invoer diverse unieke cellen = diverse unieke registraties invoertijdstip
« Reactie #8 Gepost op: 13 oktober 2019, 20:09:25 »
Hallo David,

prima, dat wil zeggen dat je weer wat bijgeleerd hebt  :thumbsup:

Groeten,

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
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 !

 


www.combell.com