Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  87 88 89 90 91 92 93 94 95   další » ... 156
odkaz na list (29.5.2015 14:55)

@elninoslov
A ako to vyskúša bez tlačiarne???

Excel mi mění velikosti buněk (28.5.2015 11:31)

poopp napsal/a:

marjankaj napsal/a: A kde je ten súbor?
No, to by mě zajímalo, tady nic není..Příloha: 25217_xlstart.jpg

Priložiť súbor ako prílohu znamená že sem dáš súbor v exceli teda *.xlsx anie nejaký obrázok 4
To ako keby si prišiel k lekárovi, že tvoju manželku pichá v chrbte. Lekár asi nezistí, že tam má zapichnutý nôž alebo niečo iné.

Excel mi mění velikosti buněk (28.5.2015 9:49)

poopp napsal/a:

jestli se jedná o soubor PERSONAL.XLSB kterej by měl být v adresáři: C:\Users\K65\AppData\Roaming\Microsoft\Excel\XLStart tak ani na jednom PC v této složce bohužel nic není.

A kde je ten súbor?

Matice, podminky, median (27.5.2015 18:24)

Excel 2003
IF(ISERROR(s);"";s)

Kopie vyhovujích záznamů do jednoho listu (26.5.2015 11:31)

Daj(skopíruj) to všetko na jeden list a vyfiltruj.
Pôvodné ti zostane.

Posun obsahu buňky v řádcích (23.5.2015 18:08)

No keby jeden tušil, ako sa ten súbor vytvára a načo slúži, tak by sa vedel adekvátnejšie vyjadriť. Ale to zrejme budú "citlivé" informácie.

Posun obsahu buňky v řádcích (23.5.2015 17:36)

Nemaže Head1? Ani v tomto súbore?
Ja sa nehádam, proste som neprečítal tú nuansu.
A prečo by sa to malo spúšťať ešte raz? To zadávateľ neuviedol.
xlDown sa dá použiť, zadávateľ uviedol, že stlpec A je vždy vyplnený textom.
Inak pozri aj jeho koment z (23.5.2015 14:04)
No takéto zadania sú fakt úžasné.

Posun obsahu buňky v řádcích (23.5.2015 16:01)

@elninoslov.
Reagoval som na tvoj prvý súbor. Keby tam mal 20000 riadkov, tak to by si sa ukódoval. 2
S tým Head1 máš pravdu. Len mi nie je jasné, či presne to chcel aj zadávateľ.
Ale ak je zaplnené všetko po Head4 dokonca aj Head5, tak to funguje podľa zadania.

Ale keď inak nedáš, tak takto.

Sub Posun()
For Each bunka In Range("A2", Range("A2").End(xlDown))
bunka.Offset(, 5).End(xlToLeft).Cut bunka.Offset(, 4)
Next bunka
End Sub

Posun obsahu buňky v řádcích (23.5.2015 15:17)

@elninoslov
Aj tak sa dá prohramovať. 2

Sub Posun()
For Each bunka In Range("A2", Range("A2").End(xlDown))
bunka.End(xlToRight).Cut bunka.Offset(, 4)
Next bunka
End Sub

Co je špatně ? (21.5.2015 11:30)

A hľadáš "Internet Mall" alebo "=Internet Mall"?

Adresování buňky VBA (13.5.2015 16:34)

Cells(4, 4).FormulaR1C1 = "=IF(R[" & prvnicislo + 5 & "]C[" & sloupecjc - 5 & "]="""","""",666)"

Síce netuším čo sleduješ, ale asi takto.

Když více podmínek (13.5.2015 14:36)

IF(A1>10;A1;IF(A1=0;0;10))

Výpočet částky dle pravidel (13.5.2015 12:26)

@elninoslov
Rozhodujúce pre určenie sadzby by asi mal byť začiatok. Koniec je irelevantný.
Inak trochu zvláštne zadanie.

VBA Porovnání (13.5.2015 12:05)

napríklad takto
text = Replace(Text, "á", "a")

Výpočet částky dle pravidel (12.5.2015 14:44)

Ale to nerieši situáciu. Čo ak to řízení potrvá do 19:00?


Strana:  1 ... « předchozí  87 88 89 90 91 92 93 94 95   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