< návrat zpět

MS Excel


Téma: Kopie stranek rss

Zaslal/a 23.10.2011 21:05

Zdravím, měl bych dotaz ohledně excelu 2007. Ma vytvorenou f-ci která mi po zadaní parametru zkopiruje urcite hodnoty k ni prirazene... Vyuzivam to v 31 listech(dnu v mesici) a potreboval bych vysledne hodnoty hromadne zkopirovat, aby v nich nebyly zadne vzorce ale pouze vysledky... V 1 listu to neni problem , ale jak to udelat hromadne ve vsech??? predem dik za pomoc.

Zaslat odpověď >

#006241
avatar
Nie je úplne jasné, čo zamýšľaš. Predpokladám, že na 31 listoch chceš všetky vzorce nahradiť hodnotami, potom by malo stačiť nasledovné:

Pozor! Zmena je nevratná, takže výsledok musíš uložiť ako nový zošit, inak o vzorce v pôvodnom zošite prídeš. Pokiaľ chceš niečo iné, tak to budeš musieť asi lepšie popísať.citovat
#006242
avatar

Option Explicit
Sub Hodnoty()
Dim i As Integer
Application.ScreenUpdating = False
For i = 1 To Worksheets.Count
With Worksheets(i)
.Cells.Copy
.Range("a1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End With
Next i
For i = 1 To Worksheets.Count
Worksheets(i).Select
Range("a1").Select
Next i
Worksheets(1).Activate
Application.ScreenUpdating = True
End Sub
citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21