• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Knop met macro doet extra dingen?

Status
Niet open voor verdere reacties.

EliaNieuwhuis

Gebruiker
Lid geworden
23 jul 2015
Berichten
77
Ik heb een knop gemaakt met een heel eenvoudige macro die ik heb opgenomen.
Deze werkt. Alleen, als ik er op klik, verdwijnt er tekst uit een willekeurige cel?!

Hoe kan dit? Kan er ergens een verborgen opdracht zijn?

Bedankt!

Elia
 

Bijlagen

  • Macro.JPG
    Macro.JPG
    38,6 KB · Weergaven: 71
  • Knop.JPG
    Knop.JPG
    15 KB · Weergaven: 57
Plaats een voorbeeld documentje waarin dat gebeurt.
 
Re:

Ik kan het bestand niet plaatsen ivm de inhoud.

Zodra ik op de knop druk wordt cel A59 wordt leeggemaakt. Zie bijlage.
 

Bijlagen

  • VOOR.JPG
    VOOR.JPG
    24,6 KB · Weergaven: 54
  • NA.JPG
    NA.JPG
    19,9 KB · Weergaven: 58
Ik vraag ook niet om HET document maar een voorbeeldje er van.
 
Welke van beide macro's, je screenshot heeft er twee?
Staat er een formule in die cel die "leeg" wordt en verandert deze formule niet?
 
Zonder het bestand wordt dit heel lastig. Je kunt overigens alle vertrouwelijke info er rustig uit verwijderen hoor.
 
Het blijkt dat als ik op de knop OVERIG druk, dat de cel die ik op dat moment selecteer, wordt leeggemaakt.
De formule van de macro luidt

Sub PM7knop()
'
' PM7knop Macro
' PM7knop
'

'
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=R[95]C[-1]"
Range("C14").Select
End Sub
Sub Overigknop()
'
' Overigknop Macro
' Overigknop
'

'
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=R[96]C[-1]"
Range("C14").Select
End Sub
 
Logisch, want de geselecteerde cel is de activecell.
Waarschijnlijk is dan de cel waar je naar verwijst leeg.
Als cel C14 moet wijzigen, denk dat dit de bedoeling is.:rolleyes:

Code:
Range("C14").FormulaR1C1 = "=R[96]C[-1]"
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan