Hej,
Jag har en produktlista där alla anställda har sitt eget blad där man fyller hur många antal man vill ha av en viss produkt. Nu skulle jag vilja ha ett makro som väljer antal (ifyllda) samt produkt och sedan kopierar det till en orderlista, där det listas snyggt o prydligt med den anställdes namn och vad som han/hon har beställt...
Jag får det inte att funka på något vis, har försökt spela in makro genom att välja: "knapp"-autofilter-ifyllda-kopiera-klistra in på order listan, men ICKE!
Vet inte vad det är för fel eller rättare sagt, vad jag gör för fel... Skulle vara väldigt tacksam för hjälp!!
Pröva en gång tidigare lite på skoj, och om jag inte minns helt fel så gjorde jag på samma vis men makrot såg helt annorlunda ut, och funkade!! :)
Nu får jag en fel kod som heter"körfel no 438" och makrot ser sedan ut såhär:
Sub Move()
'
' Move Makro
' Makrot inspelat 28.1.2011
'
'
ActiveSheet.Shapes("Button 2").Select
Selection.AutoFilter Field:=1, Criteria1:="<>"
Range("A12:E456").Select
Selection.Copy
Sheets("Order").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
|
|