Solved: opmerking ophalen uit werkblad

Wie kan mij helpen? Ik krijg iedere maand een spreadsheet met gegevens. Middels opmerkingen geef ik aan wat de oorzaak is van bepaalde gegevens. Het spreadsheet dat ik iedere maand krijg geeft de cijfers weer van de lopende maand maar ook de verstreken maanden. Hoe krijg ik de opmerkingen die ik in de voorgaande maanden aan cijfers heb gehangen overgehaald naar het laatste spreadsheet.

In de bijlage vind je een voorbeeld. In test jan zijn enkele cijfers middels een opmerking toegelicht. In test feb zijn de cijfers van test jan zichtbaar en de nieuwe cijfers over februari. Hoe krijg ik de opmerkingen van test jan in test feb bij de cijfertjes?

Bedankt alvast voor de hulp.


Ger

Met de nodige hulp van anderen is het gelukt. Voor de geinteresseerde:

Code:

---

Sub OpmerkingenKopieeren()
Sheets("tm").Select
Range("A2").Activate
'On Error GoTo FoutAfh
    Do Until IsEmpty(ActiveCell)
        zkwrd = ActiveCell
        Range(ActiveCell.Offset(0, 6), ActiveCell.Offset(0, 32)).Copy
        Sheets("NSR").Select
        Columns("A:A").Find(zkwrd, LookIn:=xlValues).Activate
        Range(ActiveCell.Offset(0, 6), ActiveCell.Offset(0, 32)).PasteSpecial xlPasteComments
        Sheets("tm").Select
        ActiveCell.Offset(1, 0).Activate
    Loop
Application.CutCopyMode = False
Range("A2").Activate
Exit Sub
FoutAfh:
    Sheets("tm").Select
    Application.CutCopyMode = False
    MsgBox "Op blad NSR ontbreekt de sleutel: " & zkwrd
End Sub

---

Dank je wel!!!

Die kan ik ook goed gebruiken!

Perdón. He querido decir "formulario en tiempo de EJECUCIÓN"
Busco el botón para editar el post "Edit" pero por más que lo busco, no aparece.

as you can see on the flags it is dutch.

Ger

Hoe krijg ik de opmerkingen van test jan in test feb bij de cijfertjes? : pray2:

Matt619,

wat is Uw vraag?

Ger

This is my first opportunity to visit this website.I want to show my admiration for your generosity in support of people that should have assistance with your question.

Support you