• 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.

Alleen de waarde verplaatsen van een cel uit bestand naar ander bestand

Status
Niet open voor verdere reacties.

Johande

Gebruiker
Lid geworden
23 nov 2015
Berichten
88
Beste Allemaal,

Ik heb een vraag over het kopiëren van cel in een bestand naar een andere cel in een ander bestand.
Maar dan alleen de waarde van de cal die ik heb geselecteerd.
Deze onderstaande code is opgenomen zoals het eigenlijk moet worden.
Range("F8").Select
'Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Is hier een code voor?
Als ik de cel kopieer en plaats hem in de cel waar deze moet komen selecteer ik met de rechter muis knop alleen waarden.
Dit zou ik graag in de code verwerken dat dit automatisch gaat gebeuren.

Als ik de cel copier in het bestand wat ik nu toepas doet hij niet wat het moet doen en als ik alleen de waarde kopieer wel.

'Hoe kan ik wsi.Range("F" & i).Value alleen de gegevens van sourceSheet.Range("F" & 6 + i).Value geven?
'Zoals hieronder aangegeven?

'Range("F8").Select
'Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

'merken
wsi.Range("B" & i).Value = sourceSheet.Range("B" & 6 + i).Value
'Aantal
wsi.Range("C" & i).Value = sourceSheet.Range("C" & 6 + i).Value
'Breedte
wsi.Range("F" & i).Value = sourceSheet.Range("D" & 6 + i).Value
' Hoogte
wsi.Range("M" & i).Value = sourceSheet.Range("E" & 6 + i).Value



Ik hoop dat het duidelijk is,

Met vriendelijk groet,
Joha
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan