Oprettet fre. d. 24. august 2012 kl. 10:53:26
kopiere format makro
Hej er der nogen der kan hjælpe mig.Jeg skal kopiere formater og indhold fra en fil til en anden
får ikke formatet med kun indhold.
Private Sub opdaterVfil(kid, ræk)
Dim xls
Set xls = CreateObject("Excel.application")
With xls
Rem Åbn V-filen
.Workbooks.Open vsti + kid
.Sheets(1).Unprotect Password:="*****"
.Sheets(1).Cells(32, 3) = Cells(ræk, 4) ' overfører koncept skiver fra kolonne 4 og sætter ind i C32
Det er i 2010 og xlsm filer
Laila
Skrevet fre. d. 24. august 2012 kl. 11:50:15| #1
Range("A6").Select
Selection.Copy
Range("F6").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
Log ind
Seneste spørgsmål
Hjælp til VBA kode
trække data fra 2 regneark sammen til 1
Seneste guides
Seneste nyheder
Tips & Tricks fra PC World
Fem smarte funktioner i din Mac som du sikkert ikke kender
Her har du fem muligheder for at tweake din Mac på en fed måde.
Anmeldelser fra PC World
Test: Samsung Galaxy S4 er et hit - trods gøglertricks
Kan Samsung beholde førertrøjen i det store Android-race? Galaxy S4 er smækfyldt med innovative funktioner, men også med en del gøgl. Er det for meget? Få vores dom over Samsungs nye topmodel.
Seneste blogindlæg
Tvangslukke spørgsmål: Hvad er den bedste løsning?
Hej Vi har mange åbne spørgsmål på Eksperten. Vi ville gerne tvangslukke dem - så et spørgsmål efter f.eks. 6 måneder lukkes. Men der er et par uklarheder som ville være gode at få lidt input til:...
Nyheder fra PC World
Ny opfindelse: Oplad din mobil på 20 sekunder
Måske er det snart slut med at lade mobilen op hver aften. Med ny opfindelse kan telefonen få fuld energi på sølle 20 sekunder.
Nyheder fra Computerworld
Galleri: De 10 vildeste datacentre i verden
I en gammel kirke, i et oppusteligt telt, på nedlagte militæranlæg eller midt i ørkenen. Der er ingen grænser for, hvor man kan banke et datacenter op. Her er de 10 sejeste anlæg i verden. I...
Udgiver · © 2013 IDG Danmark A/S · Hørkær 18 · 2730 Herlev · Tlf.: 77 300 300 · Fax: 77 300 301 · Brug af personoplysninger