MS Excel

Téma: zápis pomocí makra

Zaslal/a Chronik 12.6.2023 13:49

Zdravím,

Potřeboval bych poradit jak pomocí makra načíst hodnotu buňky a zapsat ji do pole na pozici podle jiné buňky...

něco na způsob:

Sub zapis()
Range("Z2:BA2").Cells(12) = "=c74"
Range("Z3:BA3").Cells(12) = "=c75"
Range("Z4:BA4").Cells(12) = "=c76"
Range("Z5:BA5").Cells(12) = "=c78"
End Sub

Ale ta buňka Cells(12) byla proměnná hodnota - 1 - 31.

Zaslat odpověď >

knodl(12.6.2023 16:28)#055039

a odkud se ta hodnota má vzít?
Tezko odhadovat, kdyz se neví, co to má vlastne delat. Z toho popisu to nejak nedokazu vyvodit...
Popis rika, ze se chce nacist hodnotu bunky a zapsat ji jinam, ale kod rika, zapsat do dvanacte bunky dane oblasti odkaz na bunku ve sloupci C (do natvrdo daneho radku).citovat

Chronik(12.6.2023 16:56)#055040

Potřebuji načíst hodnoty ve žluté oblasti a zapsat do zelené s tím, že do kterého sloupce se zapíše rozhoduje modrá - to je proměnná.

Nevím jak to popsat líp.

Příloha: gif

55040_vystrizek_excel.gif.gif (33kB, staženo 35x)

citovat

elninoslov(13.6.2023 10:22)#055041

Sub ZapisHodnot()
With Worksheets("Hárok1")
.Range("D3:D6").Offset(, .Range("C3").Value).Value = .Range("B3:B6").Value
End With
End Subcitovat

Chronik(14.6.2023 13:09)#055046

ano, to je přesně ono.

Děkuji moccitovat

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

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

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.