Alleen waarde verplaatsen van een cel uit bestand naar ander bestand

Status
Niet open voor verdere reacties.

Johande

Gebruiker
Lid geworden
23 nov 2015
Berichten
47
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.
Code:
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?

Code:
'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
[B]wsi.Range("F" & i).Value = sourceSheet.Range("D" & 6 + i).Value[/B]
' Hoogte
wsi.Range("M" & i).Value = sourceSheet.Range("E" & 6 + i).Value



Ik hoop dat het duidelijk is,

Met vriendelijk groet,
Joha
 
Laatst bewerkt door een moderator:
Plaats een voorbeeld document en vertel er ook bij wat er nu dan niet goed gaat.
 
Hallo Edmoor,

Hierbij de bestanden.
Wel uitgekleed maar maar wat ik bedoel doet ie.

Nu 1 regel op blad inmeten ingevuld.
Als ik de 1250 aan pas verander het ook in de kolom Meet breedte.

Als ik de code importeren start en het bestand kies Kopie van Calculatie vult hij de kolommen merken aantal breedte en hoogte.
Alleen niks automatisch meer in de kolom Meet breedte.

Als ik het bestand Kopie van calculatie opent en de cellen selecteer en dan kopieer in de kolommen met alleen de waarde werkt het wel.
 

Bijlagen

  • Kopie van Calculatie.xlsx
    24,8 KB · Weergaven: 19
  • Forum 1234.xlsm
    181,6 KB · Weergaven: 38
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan