Příspěvky uživatele
< návrat zpět
pavol14pavol napsal/a:
uz mi to funguje v tomto druhom zisite. Len este som prisiel na malu chybicku ze v tabulke B sa menia rozne hodnoty (riadok3-35)a nesedi mi s tabulku A. Prikladam priklad ako by to malo spravne fungovat.
v tabulke A mam cislo 25 (C:5) a toto cislo sa musi vydelit poctom kal. dni v mesiaci a rozrata sa do tabulky B (C5:35) a ked zratam tieto bunky musi mi vyjst to iste cislo 25
A prečo to hovoríš až teraz?
Merlin99 napsal/a:
Dařbůůůján. :D tvé psychycké komplexy si vyříkej se svoují mámou a nespamuj forum nikoho tu nezajímáš.
Mne skôr pripadá, že spamuješ ty s tvojimi quáziproblémami. Ale nie si jediný.
Myslel som, že ako návod to stačí.
tu je upravené makro.
Sub oprav()
Dim bunka As Range
Range("a1").CurrentRegion.Select
For Each bunka In Selection
For i = 1 To Len(bunka)
Select Case Mid(bunka, i, 1)
Case "A" To "Z", "a" To "z"
Case "ľ", "š", "č", "ť", "ž", "ý"
Case Else
bunka.Offset(0, 2) = bunka
Exit For
End Select
Next i
Next bunka
End Sub
áno je to možné prerobiť aj na makro.
a na odfiltrovanie použi automatický filter. Písal si, že je to iba 100 zlých záznamov.
@elninoslov
No pýtam sa preto či aj písmená s diakritikou sú špeciálne znaky(ľščťžýáíé) a to nehovorím už o maďarských alebo iných jazykoch.
Inak na to by mala stačiť takáto funkcia
Function nazov(text As String) As String
For i = 1 To Len(text)
Select Case Mid(text, i, 1)
Case "A" To "Z"
Case "a" To "z"
Case "ľ", "š", "č", "ť", "ž", "ý"
Case Else
nazov = text
Exit For
End Select
Next i
End Function
ďalšie písmená si doťuká ak potrebuje
Čo je závadné na slove Komarno?
Alindros napsal/a:
Ďakujem za názor
To nebol názor, ale rada.
A takíto si potom napíšu do životopisu:
Znalosť excelu - pokročilí. 
A čo tak keby si vyskúšal nahrávanie makra? Alebo si prečítaj príručku excelu. Toto sú elementárne prkotiny.
To fakt?
elninoslov napsal/a:
Malo by stačiť pridať
Application.Wait (100)
a malo by to stačiť. Už sa mi nepodarilo viac navodiť, aby to Excel nestačil "zožrať".
Prílohu som vymenil v pôvodnom poste.
elninislov, nevymýšľaj, veď potom už nič nerobí, iba čaká kým sa dotyčný vráti z bufetu. A to môže byť aj málo.
Durikam napsal/a:
Skusal som prve dve prispevky. Obidva fungovali rovnako, tak dalsie som uz neskusal. Uz to ide ale je tam jeden problem. Nazov suboru obsahuje bodku. B PVV0001N.32.pdf Takze to berie ze existuje vsetko co sa vola B PVV0001N.xxx
A prečo to hovoríš až teraz?
Presne o tom je reč. Na strojopise sa učia písať všetkými desiatimi. Tam sa nedalo prepínať medzi rôznymi klávesnicami. Aj preto sa štandartné klávesnice prispôsobujú písaciemu stroju. Preto som odpovedal ako som odpovedal.
Inak rád by som vedel, ako zadávateľ píše číslice ak nemá numerickú klávesnicu(napr. na notebooku)
Ja neviem čo kto a ako myslí. Iba sa snažím porozumieť tomu, čo napíše. A to býva niekedy/často dosť ťažké.
Aj ty raz napíšeš stlačený SHIFT a potom zase CAPSLOCK. Kto sa má potom v tom vyznať?
kabaka napsal/a:
Ja zase netuším ako by som napísala veľké písmená s diakritikovu bez SHIFTu... (excel 2007,win7, sk klávesnica, QWERTZ) Momentálne na NB asus, ale neviem si ti predstaviť ani na klasickom pc.
http://blog.animagraf.sk/pisanie-znakov-pomocou-klavesovych-skratiek/
Uživatelské menu
\nMenu
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.
RSS nejnovější články