• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: kontrola při uložení

Zaslal/a cinkim 11.9.2014 8:29

Zdravím všechny.
Napsal jsem si toto makro pro uložení kopie souboru podle čísla v konkrétní buňce.
Dim fJmeno As String
Dim fCesta As String

fCesta = "U:\AV_Beku\Mischform\hotove zakazky2014"
fJmeno = Sheets("list1").Range("BK2").Text
ActiveSheet.SaveAs Filename:=fCesta & "\" & fJmeno

Potřebuji aby před tím ale proběhla kontrola některých buňek, jestli obsahují data. Může jít o čísla i text. Jedná se o buňky D2, BK2, BK3, BL5, BJ16 a BJ18.
Dále zkontrolovat buňku BN8. Zde může být pouze "OK" nebo "STOP".
Když budou buňky obsahovat data a v poslední buňka obsahovat "OK", pak se soubor uloží podle čísla v buňce. Když ne tak potřebuji zahlásit "Zkontrolovat zadání" a soubor se nesmí uložit.
Díky moc za pomoc.

Jméno
Kontrola
Text
	Ukázka

---

Strana:  « předchozí  1 2

Stalker(11.9.2014 19:10)#021551

Sice už máš "problém" vyřešen, ale když už sem se s tím drbal tak to sem plácnu. Zvolil se jiné řešení než Palooo, tak to ber jako inspiraci.

Příloha: 21551_sesit1.rar (17kB, staženo 17x)

citovat

cinkim(12.9.2014 13:07)#021572

Díky moc. Asi použiji tuto variantu. S tabulkou pracuje hodně lidí a tato nápověda je super.citovat

Strana:  « předchozí  1 2

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse