Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  36 37 38 39 40 41 42 43 44   další »

Asi by to šlo vyřešit textem do sloupců

Karta Data -> Text do sloupců

Přihoďte přílohu a mrknem na to

Dobrý den,
nevím co dělám špatně, ale mě to nefunguje. 4

Potřeboval bych zkopírovat dokončené a potom odstranit řádky("Dokončeno").

a ještě bych potřeboval kdyby do tabulky "Tabulka38" přibylo dalších 10 nových řádků.

Dobrý den,

lze provést toto makro na všech listech?
Nějak si s tím nevím rady.

Sub skryt()


Dim wsSheet As Worksheet
Set wsSheet = Worksheets("List1")


If wsSheet.Columns("C:C").EntireColumn.Hidden = False Then

wsSheet.Columns("C:C").EntireColumn.Hidden = True
wsSheet.Columns("AI:AI").EntireColumn.Hidden = True
wsSheet.Rows("77").EntireRow.Hidden = True
wsSheet.Rows("80").EntireRow.Hidden = True

Else

wsSheet.Columns("C:C").EntireColumn.Hidden = False
wsSheet.Columns("AI:AI").EntireColumn.Hidden = False
wsSheet.Rows("77").EntireRow.Hidden = False
wsSheet.Rows("80").EntireRow.Hidden = False

End If

End Sub

Paráda, to je ono. Moc děkuji.

Bohužel soubor Cíl není součástí složky se soubory Zdroj a v makru mi teď pro změnu chybí cesta k souborům Zdroj.

něco jako:
C:\Users\lukas\Downloads\43086_prenos-dat\Prenos dat\Format(Datum, "yyyy.mm.dd") & "_Zdroj.xls

Omlouvám se jestli jsem to nezmínil.

Hned jak budu u PC, kouknu na to. Děkuju za tak rychlou zpětnou vazbu.

Tý jo, to je na rychlo jo? 1 Já bych to vymýšlel roky stejně bych nic nevymyslel.

Nešlo by to tam spíše nějak zapsat toto:

Sub Import_dat()

Datum = InputBox("Zapište datum.")
ok = Append("C:\Users\lukas\OneDrive\Plocha\Prenos dat" & Datum & "_Zdroj.xls")
' zde by makro poračuje
'
'
'

Mohl bych mít ještě jednu prosbu?

Šlo by místo ručního výběru souboru použít InputBox
Když zdrojový soubor má vždy přidělený datum (např. 2019.03.29_Zdroj) do InputBox by se zapsal datum a makro by si doplnilo &"_Zdroj" vyhledalo atd...?

Tak to funguje super, děkuji.

Zdrojový soubor má vždy přidělený datum (např. 2019.03.29_Zdroj), ale list se vždy jmenuje stejně.

Zkusím to implementovat do mého souboru.

Moc si vážím pomoci a děkuji.

Dobrý den,

mám makro na přenos dat, z jednoho sešitu do druhého, jednu část mám vyřešenou, ale s tou druhou si nevím rady. Je to ta část kdy potřebuji data přiřadit k datumu (29.03.19) v týdnu.

Zvládl by mi někdo pomoci?

Děkuji

Dali by se tyto dvě makra spojit v jedno, tak aby se ovládali jedním tlačítkem?

Děkuju

Dobrý den,

našel jsem makro, které by bylo použitelné. 7
Jen bych to potřeboval upravit tak, aby tabulka odkazovala na zaškrtnutý list. 4

Super, moc děkuju. 1


Strana:  1 ... « předchozí  36 37 38 39 40 41 42 43 44   další »

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

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

Relativní cesta - zdroje Power Query

Alfan • 25.4. 10:49

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 10:47

Relativní cesta - zdroje Power Query

Alfan • 25.4. 10:40