• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Fórum

Příspěvky uživatele

No, budeme Vám veriť Mne to hodí #NEDOSTUPNÝ. O fnc PROB som ani netušil, a SOUČIN.MATIC/MMULT som videl v reále tuším raz (myslím, že tu na fóre). Skúmať sa mi to nechce. Hlavné je, že máte výsledok

Prečo nemôžete použiť takúto prevodnú tabuľku ? Hoďte ju opravenú (máte tam chybné relatívne adresovanie), na skrytý list a máte to bez makra, ktoré by Vám znemožnilo Undo, pretože by ste musel použiť OnChange udalosť.

EDIT: Napr takto. Len si buď dopredu rozšírte výberovú tabuľku, alebo pred zadaním nového mena, o jedno potiahnite dole pravý spodný roh.

A keby ste niečo také chcel, musíte použiť makro. Napr. takto. Parametrov zadajte koľko chcete sčítať TextBoxov. Musíte poznať meno TextBoxu. Je nanajvýš vhodné si ich premenovať. A potom ich zapíšete ako text spolu s názvom listu, tak ako je v ukážke.

No mňa porazí druhý krát! Tak to je potom poriadny průser! To som si vôbec nevšimol. Fujtajbl, to bude zase bordel v tom. 365-ťka je ekonomicky výhodnejšia. Tento model naozaj vo veľkom pred rokmi zaviedlo Adobe na svoje CC, a už sa to odvtedy vezie, kancelársky SW, hry, myslím, že už som počul o 3D SW. Aj voľakedy to tak bolo (také účto a iné), ale to bolo v malom merítku.

Výpočet IBAN. Nikde mi to tu nenašlo, tak keď niekto potrebuje, vyskúšajte. Robil som to podľa tohto návodu a testoval na pár známych už prepočítaných číslach, aj podľa NBS, a sedí to.

Niet, čo viac dodať. Taká blbosť...

Úprava podľa SZ.

Tak skúste niečo takéto (Stĺpec C má formát Text):
Sub IncreaseNumber()
Dim Hodnota, Riadok As Long
With ThisWorkbook.Worksheets("Hárok1")
Hodnota = .Cells(5, 3)
If Hodnota = "" Or Not IsNumeric(Hodnota) Then
.Cells(5, 3) = "0001"
Else
Riadok = .Cells(Rows.Count, 3).End(xlUp).Row
If Riadok + 1 > 5 Then .Cells(Riadok + 1, 3) = Format(Val(.Cells(Riadok, 3)) + 1, "0000")
End If
End With
End Sub

Tak?

Vracia to číslo riadku. Pre vrátenie hodnoty z iného stĺpca sa to upraví na:
{=INDEX(B1:B10;MATCH(TRUE;SUBTOTAL(9;OFFSET($A$1;;;ROW(A1:A10)))=3000;0))}
{=INDEX(B1:B10;POZVYHLEDAT(PRAVDA;SUBTOTAL(9;POSUN($A$1;;;ŘÁDEK(A1:A10)))=3000;0))}
Ak nieje presný súčet vráti chybu #NEDOSTUPNÝ

EDIT: Jáj, a keby ste hľadali prvý súčet, ktorý prekročí hranicu, tak "=3000" nahraďte ">3000", príp ">=3000"

No mňa porazí ! Konečne CONCAT/TEXTJOIN

Parameter 1 na konci, treba zmeniť na 0.

Varianty som popisal 3, Tak teraz neviem čo myslíte. Takže máte zálusk na import vyexportovaného súboru ? Alebo máte teda na mysli to, že z jedného Excelu do druheho Excelu. Ak to s tým exportom, tak ho treba dodať nech sa naňho pripravíme, no ak je to iný excel subor, takbto spravíme tuším ešte lahšie. Dajte ešte čo najviacbinformácií, a možno večer sa bVám na to pozriem.

Z brucha:
=INDIRECT("'"&A1&"'!J2")
=NEPŘÍMÝ.ODKAZ("'"&A1&"'!J2")

riadok 33
.Resize(, 31)
vo With nadtým je vlastníkom
.Cells(11, 2)
a to je jedna bunka (teda jednoriadková oblasť a jednostĺpcová oblasť).
V metóde Resize ak nieje uvedený parameter pred/za čiarkou, považuje sa za parameter, aktuálny. Teda aktuálny parameter vlastníka je (1,1). Ten druhý parameter "ColumnSize" ale už v kóde meníme na 31.

Google:
Možno toto je to, čo spomína DAAL:
Mrknite na riadok
connDB.Execute "INSERT INTO SalesManager (EmployeeId, FirstName, Surname, JoinDate) VALUES (2, 'Mary', 'Smith', '6/20/2009')"

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Formulář Faktura

Helios iNuvio

On-line nástroje