Henk Benter
Gebruiker
- Lid geworden
- 13 mei 2010
- Berichten
- 154
Met de volgende code kopieer ik vanuit een blad "Bestek" de bestekcode, die ik selecteer, middels een dubbel klik naar het blad "Bestekscodeoverzicht", alwaar ik op de positie ga staan waar de code moet komen te staan. Hartstikke mooi werkt dit. Naast het blad "bestekscodeoverzicht" heb ik meerdere bladen.
Ik wil graag variabel kunnen kiezen naar welk werkblad ik de bestekcode kopieer middels de dubbel klik. Is het mogelijk dat de keuze van het blad waar naartoe ik de bestekcode wil kopieren variabel wordt.
Wie heeft voor mij de oplossing. Dank alvast.
Ik wil graag variabel kunnen kiezen naar welk werkblad ik de bestekcode kopieer middels de dubbel klik. Is het mogelijk dat de keuze van het blad waar naartoe ik de bestekcode wil kopieren variabel wordt.
Wie heeft voor mij de oplossing. Dank alvast.
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim sNaam As String
Cancel = True
Worksheets("Bestekscodeoverzicht").Cells(iCount + 2, 1).Value = Target.Value
iCount = iCount + 1
End Sub