Příspěvky uživatele

Toho by som tam zmenil podstatne viac. Vlastne skoro celé

Ak to je xlsm, musíte to zabaliť do ZIP/RAR. Ak je príloha veľká, musíte odstrániť nadbytočné riadky/stĺpce, obrázky, listy, .... Neviem, aké je presne obmedzenie. Možno do 300 KB

Celé sa to musí pojať úplne odznovu, postupne, jasne.

1. Ako to môžete mať na cloude, keď sa hrabete v C:\Users? Na cloude to môžete mať napr. na OneDrive, DropBox, GoogleDrive, firemný cloud, ... Ak je to zdieľaná zložka na inom PC vo Vašej sieti, tak to nie je cloud, ale len zdieľaná zložka/disk. A tiež nie je v C:\Users. Vysvetlite.

2. Vy ste užívateľ "Fero" na PC menom "KOMP1" a chcete súbor zo zdieľaného adresára užívateľa "Mišo" na PC menom "KOMP2"? Ak áno, viete alebo neviete že sa užívateľ volá "Mišo", a viete alebo neviete že sa PC volá "KOMP2"?

3. Alebo Vy ste užívateľ "Fero" na PC menom "KOMP1" a chcete súbor zo zdieľaného adresára užívateľa "Mišo" na tom istom PC menom "KOMP1"?

Ja Vám nikomu proste nerozumiem. Keď je niečo na serveri/cloude, tak to má nejakú adresu/cestu/link. Tá je predsa PEVNÁ. Nepotrebujete riešiť Vaše konto, jeho konto, názov PC a pod. Cesta je pevne daná, mení sa max názov súboru ktorý chcete. Skúste vysvetliť inak to čo potrebujete. Nech to pojmeme aj my nechápaví

Možností je mnoho

Niekto tu mal pred chvíľou tému na uloženie kópie zošitu bez makra a tlačítka. Skôr ako som to odoslal, téma zmizla.
Len doplním:
Nerobte SaveCopyAs, zostane tam tlačítko, musíte to znova otvárať a mazať...
Urobte to takto - skopírujte iba list (listy). Je to určo rýchlejšie.

Takže spracovať len tie riadky, v ktorých je označená bunka v B, alebo tie ktoré majú hocikde v riadku označenú bunku (A:M)?

Súbor obsahuje na celkový súčet makro. To Vám v telefóne určite nepôjde, ale urobí sa to vzorcom. Ďalej špecifikujte čo presne znamená pre Vás otočiť na výšku. Koľko zamestnancov potom bude na šírku? V tomto prípade boli asi na oddelenia rozdelení, Vy to tak máte tiež? Môže byť smena cez polnoc? Aké sú pravidlá, kedy sa ráta začiatok rannej a koniec nočnej? O 6:00? Takýchto prípadov tu už bolo mraky, a vždy je s tým problémov hafo ...

@Jano5 : V Lugr-ovom kóde je ale stále meno PC
...
PCN = objNetwork.ComputerName
...

Skúste najskôr tie najjednoduchšie možnosti:
CESTA = "C:\Users\" & Environ("username") & "\Documents\MEGA\import\Report\"
alebo
CESTA = "C:\Users\" & CreateObject("WScript.Network").UserName & "\Documents\MEGA\import\Report\"
Ale to problém môže nastať aj inde. Uživateľské adresáre ako napr. "Dokumenty" nemusia byť len v "Users\meno\Documents\", ale napr. ja ich mám na "D:\Dokumenty\"

Mrk sem

Viete o tom, že tá časť za "Users" NIEJE názov PC ale názov užívateľského účtu na PC?
Každopádne Lugr-ove riešenie môžete zakomponovať jednoduchou úpravou jediného riadku
CESTA = "C:\Users\" & CreateObject("WScript.Network").ComputerName & "\Documents\MEGA\import\Report"
EDIT:
Neskúšam, ale len od pohľadu Vám to nemôže fungovať. Za cestou Vám chýba lomítko. V opačnom prípade bude názov súboru začínať "ReportReport ..."

Opäť nejasný dotaz.
Chcete kopírovať skutočne iba hodnoty (výsledky vzorcov) alebo aj vzorce?
Ak aj vzorce, tak tie vzorce odkazujú iba na ten konkrétny zošit v ktorom sa nachádzajú, alebo aj na iné zošity?
Takéto kopírovanie iba makrom.
Nemôžete kopírovať celé listy? (ručne)
Nemôžete kopírovať celý zošit? (ručne)
...

Nejasné...

Viete, že je to dosť riskantné?

Skúšať VÝHRADNE NA KÓPII CELÉHO ADRESÁRA !!!

Ak je tých súborov viac, je výhodné použiť novú inštanciu Excelu. Približne takto. Je tam nejaká kontrola zle zadaného stĺpca, neexistujúceho listu. A to som tam ešte nedal kontrolu, či je súbor už otvorený, a či pri ukladaní nedošlo k chybe. Počet vecí, na ktoré treba myslieť je veľa...

Private Sub CommandButton1_Click()
On Error Resume Next
ActiveSheet.Range("A1").Value = DateValue(Replace(TextBox6.Text, ".", "/"))
If Err.Number <> 0 Then MsgBox "Nie je zadaný dátum!", vbCritical, "Chyba !"
On Error GoTo 0
End Sub

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje