Dobrý den,
prosím Vás o pomoc s jednoduchým makrem:
Dim dod As Range
Set dod = Sheets("Prehled").Range("B2")
If Not IsEmpty(dod) Then
If Not IsEmpty(dod.Offset(1, 0)) Then
Set dod = dod.End(xlDown)
End If
Set dod = dod.Offset(1, 0)
End If
Sheets("Faktura").Range("I5").Copy Destination:=dod
Set dod = Nothing
Potřeboval bych aby se proměnná "dod" kopírovala bez formátů, pouze jako hodnota. Prosím Vás o opravu.
Děkuji moc
Makro excel
-
- Level 4.5
- Příspěvky: 1544
- Registrován: březen 11
- Bydliště: Drsná Vysočina :D
- Pohlaví:
- Stav:
Offline
Re: Makro excel
Třeba, místo
toto
Kód: Vybrat vše
Sheets("Faktura").Range("I5").Copy Destination:=dod
toto
Kód: Vybrat vše
dod.Value = Sheets("Faktura").Range("I5").Value
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 9
- 1125
-
od mmmartin
Zobrazit poslední příspěvek
29 srp 2023 16:47
-
- 16
- 6268
-
od mirekol
Zobrazit poslední příspěvek
20 říj 2023 08:31
-
- 1
- 387
-
od Grimm
Zobrazit poslední příspěvek
12 bře 2024 21:43
-
- 2
- 1794
-
od honzzicek
Zobrazit poslední příspěvek
01 črc 2023 08:57
-
- 3
- 1981
-
od Story-Long
Zobrazit poslední příspěvek
14 srp 2023 10:11
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 5 hostů