Binnen kort zal een leek zelf zijn excel code kunnen schrijven

[glda19]

Ik heb een tabel die ik al sins vorig jaar gebruik en moet die maandelijks enkele keren invullen
Maar als er in kolom g een bepaalde tekst uit de validatielijst selecteer mag er een vaste tekst komen in klom h.
Dacht maak een als functie maar dat gaat niet omdat ik bij andere tekst uit de validatie lijst zelf de tekst moet schrijven.
Ik wist niet direct hoe ik dit kon oplossen. Stelde de vraag aan chatgpt en kreeg direct een werkend vb waar ik enkel de kolomen moet van wijzigen en de tekst waarop we controleren en de vaste tekst.
Vind dit echt straf.

'Private Sub Worksheet_Change(ByVal Target As Range)
'    Dim r As Range
'
'    ' Controleer of de wijziging in kolom 7 is (kolom G)
'    If Not Intersect(Target, Range("G:G")) Is Nothing Then
'        For Each r In Target
'            ' Alleen automatisch invullen als kolom 8 (H) leeg is
'            If r.Offset(0, 8).Value = "" Then
'
'                ' VOORBEELD: als kolom 7"Graffiti" bevat ? vul "Verwijderen graffiti    "
'                If InStr(1, r.Value, "Graffiti", vbTextCompare) > 0 Then
'                    r.Offset(0, 8).Value = "Verwijderen Graffiti"
'                End If
'
'            End If
'        Next r

 

[Senso]

Ja goed en dan zijn we nog niet eens in de hemel!

 

[glda19]

hoe bedoel je

 

[popipipo]

Maar wat is je vraag nu precies?

... leek zal zelf zijn code kunnen schrijven

Volgens mij heeft Chatgpt hem gemaakt.
Hier op helpmij.nl had je denk ik ook een werkende code kunnen krijgen.
Dus wat is het verschil tussen chatgpt en helmij.nl

 

[glda19]

maar is toch straf dat chatgpt deze eenvoudige code schrijft
weet dat jullie de ook kunnen

 

[edmoor]

Dat is een eenvoudig stukje code.
Maar ik ben het met je eens dat ChatGPT best indrukwekkend kan zijn.
Ook voor andere zaken dan programmacode.