Plakken speciaal waarden werkt niet

Status
Niet open voor verdere reacties.
Henk Schepers

Henk Schepers

Gebruiker
Lid geworden
3 apr 2004
Berichten
187
Beste helpers
Ik ben bezig een kassa systeem te maken in excel.
Gaat allemaal goed maar begrijp niet dat als ik een kopieer opdracht in de macro zet
en dan plakken ActiveSheet.Paste in een andere sheet doe het goed gaat
maar plakken speciaal waarden een foutmelding krijg. PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
komt het door de lege cellen die hij niet wil plakken omdat er geen waarde inzit of
heeft dat een andere oorzaak. Na het plakken in de data sheet mag het niet meer veranderen
en mogen er ook geen formules meer instaan.Screen Shot 12-28-15 at 09.56 PM.jpg
Al vast bedank
 
Laatst bewerkt:
Vlgs. mij gebruik je het nu verkeerd.
Moet het niet zoiets zijn als:
Code: 
ActiveCell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

Tijs.
 
Laatst bewerkt:
Aan plaatjes hebben we niet zoveel. Als je de waarden van de ene sheet naar de andere wil hebben is zoiets voldoende.

Code: 
Sheets(2).[A1:A3] = Sheets(1).[A1:A3].Value
Waarbij je de bereiken natuurlijk nog wel dynamisch moet maken.

Beter kan je even een voorbeeldje plaatsen.
 
De inhoud van mijn berichtje heeft een iets andere strekking. Het bedankje mag je dus aan dnties richten.;)

Volgens mij kan het hele gebeuren in twee a drie regels geschreven worden. Maar als het werkt, dan werkt het.:thumb:
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan