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

Příspěvky uživatele

V první řadě je v modré řadě v prvním sloupci desetinná tečka.

Typ grafu XY
Rozdíly jsou minimální, takže grafy se překrývají.

v E2007

Soubor - Uložit jako - Nástroje - Obecné možnosti -
Heslo pro otevření
Heslo pro úpravy

Takto?

Pokud dobře chápu, soubor je na síti k dispozici více uživatelům.

Pokud není nastaveno sdílení - první uživatel může i editovat (pokud není nastaveno oprávnění jiné). Další uživatelé mohou pouze číst.
I při nastaveném sdílení by měl uvedený kód stačit.
Problém však vznikne, pokud uživatel nepovolí makra.

Info, kdo má soubor otevřený, je v souboru, který se vytvoří při otevření "~$..."
(Jen ho umět přečíst. :)

Private Sub CommandButton1_Click()
Dim Datum As Date
Datum = Range("C2")
Range("A2").AutoFilter Field:=1, Criteria1:=Datum
End Sub

Pokud kopírovaný vzorec obsahuje odkaz na buňku v jiném listu, zůstává tento odkaz tj.včetně sešitu a listu

Samozřejmě, že jde.

Neporadí mi někdo jak k tomu přidat vybraná data z Exifu?

@elninoslov: Díky za info, a já myslel, že je to verzí E2007

Vybírat vstupní adresář pro generování seznamu obrázků?

A nebo z listu DATA udělat rozevírací seznam? Ten bude pro 5900 položek nepřehledný i když podle abecedy. (V příloze nástřel List4 a DATA a vložený MODUL1)

V E2007 se mi nedaří propojit rozevírací seznam na "Tabulku1", aby výběrová oblast byla dynamická pro celý "Sloupec1"

Ale proto jsem dával odkaz

1.-3. ledna 2021 je pořád 53. týden roku 2020
4.-10. - 1. týden
11.-17 - 2.týden
15.01.2021 je proto druhý týden roku 2021

Základní problém je v počítání týdnů
(53/20 a 1/21 = jeden týden;
nebo lépe: poslední týden v roce nekončící nedělí a první týden v novém roce je jeden týden).
Proto bylo doporučeno použít ISOWEEKNUM

GOOGLE:
definuje norma ISO 8601. Pro první týden v roce je důležité, kterým dnem týdne daný rok začíná. Pokud začíná ve čtvrtek či dříve, jde o první týden v roce. První týden v roce tedy obsahuje minimálně jeden pracovní den. Pokud však rok začíná až v pátek či později, první týden v roce začíná až následující pondělí. V tom případě první dny nového roku patří ještě do posledního týdne minulého roku
Zdroj (12. 7. 2020): https://kalendar.beda.cz/cislo-tydne

Range("A7:D7").Formula = Range("A3:D3").Formula

=DATUM((2000+ZPRAVA(C6;2))-1; 12; 31) + 7 * (ZLEVA(C6;NAJÍT("/";C6)-1)-1) - DENTÝDNE(0;2)+5

Edit:
záleží, jak jsou týdny číslovány
jestli 1. týden je týden, který obsahuje
a) 1. ledna - zde u některých roků může být i 54 týdnů
b) první lednový čtvrtek (ISO)

ve VBA

Function JK_Pondeli(Tyden, Rok) As Date
Dim TheDate As Date
TheDate = DateSerial(Rok - 1, 12, 31) + 7 * (Tyden - 1) - Weekday(TheDate, vbMonday) + 2
JK_Pondeli = DateSerial(Year(TheDate), Month(TheDate), Day(TheDate))
End Function

Nemám teď soubor k dispozici, ale mám zato, že na listu nebyl nastavený formát buňky všeobecný.

Na listu nastavit formát # ##0,0 a v PF # ##0
mělo by fungovat pro všechna čísla

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse