Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  43 44 45 46 47 48 49 50 51   další » ... 156

Skús tento kód
Sub VytvorList()
Dim tento As String
tento = ActiveSheet.Name
For Each bunka In Range("C7:A350")
If bunka <> "" Then
On Error Resume Next
Sheets.Add After:=Worksheets(Sheets.Count): ActiveSheet.Name = bunka
On Error GoTo 0
End If
Next bunka
Sheets(tento).Activate
End Sub

Ale ak tam už taký list bude, tak čo sa má urobiť?

C7:A350 ?????
To potrebuješ vytvoriť prípadne aj 1000 nových listov?
To akože v exceli?

No lúštiť kód nemienim.
Ale xlnc dal dostatočný návod ako to urobiť.
Aj elninoslov bod č.3 je dobrý. A nielen ten bod ale všetko.
Možno ešte pred ukončením procedúra by bolo vhodné dať to ešte prepočítať. Ale to nemienim stopovať.

Takže až keď zlyhajú všetky možnosti, tak treba vložiť prílohu? 2

@veny
Máš pravdu aj v anglickom exceli je to rovnako.
No vloudila se chybička. 6

A keď si tam zadáš hodnotu 100, tak ti to má vytvoriť 100 riadkov s hodnotou "Tužka"?
To dáva zmysel. 10

Potrebuješ list tabuľky? Tak si ho vytvor. Tu to nikto za teba neurobí.

No zabudol som povedať, že keď to všetko urobíš, tak ten stlpec B môžeš vymazať.
Filtrovať alebo zoraďovať tie zoznamy môžeš hocikedy.

Že by vymazať tú procedúru?

Do B1 dáš vzorec
=IF(COUNTIF(A1;C:C)=0;NA();"ok")
a skopíruješ do konca

Potom stlač
F5
vyber špeciálne > vzorce
zaškrtni iba chyby
a dáš odstrániť riadky.
Teda ak ti nevadí aj odstránenie stlpca C. Pre istotu si ho skopíruj na iný hárok.

Stačí takýto návod?

@Matus
A ty si porozumel tomu tvojmu zadaniu bez toho aby si sa pozeral na tie tvoje súbory?

Do bunky A1 predsa dáš hodnotu a nie vzorec 4
do B1 daj
=SUMIF(F7:O22;A1;OFFSET(F7:O22;0;1))

@eLCHa
Iste to stačí.
Ja som celkom neporozumel zadaniu.
"hodnoty sú napravo" som predpokladal, že môže ísť o viac stlpcov a nie iba o jeden. Preto som skúšal ten OFFSET, napríklad pre 4 stlpce OFFSET(f7:o22;0;1;1;4), ale to nefunguje vo funkcii SUMIF a zrejme ani v iných funkciách.

=SUMIF(F7:O22;119;OFFSET(F7:O22;0;1))
alebo maticovo
=SUM((F7:O22=119)*OFFSET(F7:O22;0;1))

Nedal si tých informácií priveľa? Stačila by polovica z nich a efekt by bol rovnaký. Teda okrem času potrebného na prečítanie zadania.


Strana:  1 ... « předchozí  43 44 45 46 47 48 49 50 51   další » ... 156

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

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.

On-line nástroje