Příspěvky uživatele
< návrat zpět
Ahoj, měl bych na vás prosbu.
Mám sešit na mazání souborů podle typu, kde si mohu vybrat příponu, složku a sešit poté v celé složce smaže všechny soubory s touto příponou.
Vytvořil jsem sešit "Odstraň komentáře" podle toho sešitu na mazání souborů. Neumím ho však upravit tak, aby bylo možné:
1. Vybrat složku v PC (To už jsem zkopíroval)
2. Ve vybrané složce přejmenovat všechny soubory a to následujícím způsobem.
Každý soubor může (ale nemusí) obsahovat podtžítko "_"
Toto podtžítko je potřeba z názvu souboru smazat i se vším, co je za ním.
Máme-li tedy soubor "20058-01-001-003_upínka", výsledkem by mělo být "20058-01-001-003".
Předem děkuji
Ahoj, v příloze mám soubor, kde na kartě "Seznamy" jsou seznamy měřidel, se kterými poté pracuji na kartě "seznam_měřidel".
Celé to funguje tak, že na kartě "seznam_měřidel" mám sloupce Název měřidla, typ a měřicí rozsah. Tyto sloupce jsou na sobě závislé, pokud tedy vyberu v názvu měřidla například hloubkoměr, ve sloupci typ se mi pak nabídnou pouze typy hloubkoměrů, posuvky mají své typy atd... seznamy jsou tedy propojené. Vše funguje bezvadně, problém však je, že mi v seznamech dochází místo. Hodně je to znát u mikrometrů, kde již nemohu přidat další měřící rozsah.
Dokázal by to někdo upravit tak, abych mohl do seznamu vložit libovolný počet typů a rozsahů ? Případně, abych jich mohl zadat alespoň 40 ?
Předem děkuji
Každopádně děkuji za pomoc, navedl jste mě.
Už sem na to asi přišel, stačilo upravit buňky C14 a níže tak, aby se odkazovali právě na buňku P8.
Na kartě "Karta měřidla" bohužel není vhodné buňku H11 upravovat, protože to je informace, kterou je třeba vidět.
Šlo by upravit tak, aby se odkazovalo na buňku P8 ?
Ahoj, v příloze mám seznam měřidel.
Na kartě "Karta měřidla" jsou jednotlivé úkony, které se s daným měřidlem provedly. Jednotlivé záznamy se sbírají z karty "záznamy". Párováno je to dle výrobního čísla, což je pro mě problém, protože některá měřidla již nemají Výrobní číslo čitelné a navíc je opisování zdlouhavé vzhledem k počtu znaků. Potřeboval bych tedy, abych do sloupce "C" na kartě "Záznamy" mohl místo výrobního čísla psát číslo evidenční (číslo měřidla z karty "Seznam_měřidel), podle kterého se pak budou jednotlivé záznamy párovat.
Nejde mi připojit příloha, proto odkaz níže:
http://leteckaposta.cz/625746693
Bohužel si s tím sám neporadím.
Předem děkuji za pomoc.
Perfektní... děkuji za pomoc.
Ahoj, v mém sešitu používám skrze VBA funkci RANDARRAY.
Bohužel při uložení sešitu dojde ke změně hodnot. Napadá vás, jak tomuto zabránit ? Rád bych, aby jednak nebyl vidět vzorec a jednak, aby nedocházelo k nechtěné aktualizaci. Makro by se mělo spustit jen po kliknutí na příslušné tlačítko a poté už by hodnoty měly být stálé.
Kód níže:
Sub Start()
'
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Range("T17:W18") = "=RANDARRAY(1,1,0,0.02,FALSE)"
Range("X17:AA18") = "=RANDARRAY(1,1,0,0.02,FALSE)"
Range("AB17:AE18") = "=RANDARRAY(1,1,0,0.02,FALSE)"
Range("AF17:AI18") = "=RANDARRAY(1,1,0,0.02,FALSE)"
Range("AJ17:AM18") = "=RANDARRAY(1,1,0,0.02,FALSE)"
Range("T19:W20") = "=RANDARRAY(1,1,1.47,1.51,FALSE)"
Range("X19:AA20") = "=RANDARRAY(1,1,1.47,1.51,FALSE)"
Range("AB19:AE20") = "=RANDARRAY(1,1,1.47,1.51,FALSE)"
Range("AF19:AI20") = "=RANDARRAY(1,1,1.47,1.51,FALSE)"
Range("AJ19:AM20") = "=RANDARRAY(1,1,1.47,1.51,FALSE)"
Range("T21:W22") = "=RANDARRAY(1,1,89.98,90.02,FALSE)"
Range("X21:AA22") = "=RANDARRAY(1,1,89.98,90.02,FALSE)"
Range("AB21:AE22") = "=RANDARRAY(1,1,89.98,90.02,FALSE)"
Range("AF21:AI22") = "=RANDARRAY(1,1,89.98,90.02,FALSE)"
Range("AJ21:AM22") = "=RANDARRAY(1,1,89.98,90.02,FALSE)"
Range("T23:W24") = "=RANDARRAY(1,1,142.47,142.53,FALSE)"
Range("X23:AA24") = "=RANDARRAY(1,1,142.47,142.53,FALSE)"
Range("AB23:AE24") = "=RANDARRAY(1,1,142.47,142.53,FALSE)"
Range("AF23:AI24") = "=RANDARRAY(1,1,142.47,142.53,FALSE)"
Range("AJ23:AM24") = "=RANDARRAY(1,1,142.47,142.53,FALSE)"
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub
Předem děkuji za rady
Aha, takže troll... už je mi to jasné :)
Perfektní takhle to funguje výborně, děkuji za pomoc.
@marjankaj Jde mi o to, že v seznamu měřidel ve sloupci počítám datum příští kalibrace, ale pokud měřidlo vyřadím, nechci aby mi nadále počítal datum příští kalibrace a zároveň tam nechci prázdnou buňku.
Ahoj, napsal jsem si jednoduchý kód na změnu buňky:
Sub Vyřazeno()
Hodnota = Range("O16").Value
If Hodnota = "Ano" Then
Range("I16") = "-"
End If
End Sub
Funguje dobře, jen bych ho potřeboval rozvést...
Jde o to, že bych potřeboval aby mi fungoval cca pro 1000 řádků, ne jen pro tento jeden konkrétní. A hodilo by se mi, kdyby se kód spustil třeba při každé změně sloupce "O".
Smím požádat o radu ?
Děkuji
Používám Office 365
Super, děkuji za pomoc, moc jste mi pomohl.
Napadá vás něco ?
Pokoušel jsem se ještě upravit sešit tak, aby fungovala i karta "Celkem".
Představuji si to tak, že na kartě celkem budu vyhodnocovat všechna oddělení.
Pokoušel jsem se to udělat stejně a proto jsem vytvořil nové oblasti. V těchto oblastech jsem odebral např. ze tvaru:
=KDYŽ((DATUM_PROB>=DATUM(Konstrukce!$K$8;Konstrukce!$H$8;1))*(DATUM_PROB<DATUM(Konstrukce!$K$8;Konstrukce!$H$8+1;1))*(ODDELENI=LIST);ŘÁDEK(PROBLEM)-6)
Tuto část:
*(ODDELENI=LIST)
Možná jsem to ale jen zle pochopil, nebo něco přehlédl.
Chyba je podle mě v tom, že vzorec pracoval s názvem Karty a já tuto část vyhodil...
Poradíte mi někdo úpravu ?
Pro jistotu přikládám aktuální verzi souboru.
Díky
Ok, ta už jsem pochopil. Mátlo mě pojmenování oblastí, které jsem neznal.
Každopádně díky za pomoc
Uživatelské menu
\nMenu
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.
RSS nejnovější články