Příspěvky uživatele
< návrat zpět
Dingo napsal/a:
Ta vybraná buňka je právě v tomto případě Target. Stačí tedy změnit např. na Target.Interior.ColorIndex = 0 - nebo jiné číslo pro nějakou jinou barvu.
Vďaka, teraz je to ok.
Vďaka, funguje, a keby som ešte chcela meniť farbu samotnej vybratej bunky? Teraz mi svieti modrá. Chcela by som si ju zmeniť.
Asi treba aj tento kód niekde umiestniť, prípadne ešte inú podmienku zadefinovať.
Cells.Interior.ColorIndex = 0
Našla som toto makro, ktoré mi vyhovuje, len neviem ako vsunúť do makra, aby bunka, kde sa stretáva stĺpec s riadkom - aktívna bunka, kde je kurzor mala inú farbu.
Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Static xRow
Static xColumn
If xColumn <> "" Then
With Columns(xColumn).Interior
.ColorIndex = xlNone
End With
With Rows(xRow).Interior
.ColorIndex = xlNone
End With
End If
pRow = Selection.Row
pColumn = Selection.Column
xRow = pRow
xColumn = pColumn
With Columns(pColumn).Interior
.ColorIndex = 17
.Pattern = xlSolid
End With
With Rows(pRow).Interior
.ColorIndex = 17
.Pattern = xlSolid
End With
End Sub
Našla som aj makro na označenie bunky, ale neviem ich dať dokopy.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
Cells.Interior.ColorIndex = 0
Target.Interior.Color = vbCyan
Application.ScreenUpdating = True
End Sub
http://wall.cz/index.php?m=topic&id=8351
vkladanie príloh
3. Příloha
Registrovaní uživatelé mohou vkládat přílohy:
- ve formátech: .gif .jpg .png .txt .zip .rar .tar .7z,
Nechce mi vložiť súbor. Spakujem ho.
elninoslov napsal/a:
Spočítavanie času mi príde divné
.
Chcete tam počítať skutočne s počtom pracovných dní, alebo tým máte na mysli počet dní mesiaca. To je rozdiel.
Vyskúšajte, dajte vedieť. Je to iba rozrobená verzia,
Tak pekne po poriadku.
Pridala som nový súbor, nakoľko mi v ňom pribudlo od februára 2018 nové odd. (OMFCH) Rovnako sa inovovala aj výsledná tabuľka.
Pribudli 2 nové makrá.
1 makro mi ukladá obsah listu pri prepnutí
http://wall.cz/index.php?m=topic&id=41913
2 makro mi zvýrazňuje farebne aktívny riadok
http://www.excelvpraxi.sk/clanky/zvyraznenie-aktivneho-riadka.html
Potrebujem, aby 1 makro ignorovalo zmenu hodnoty v bunke K1.
Rovnako ako potrebujem zachovať vzorec, tak aj hypertextové prepojenie v stlpci E, kde je v stĺpci F sú napísané výkony (Nato som minule zabudla)
1)Zaraďovanie pacientov mi vyhovuje tak ako je.
Je to pre mňa jednoduchšie.
2)Čo sa týka spočítavania času, štruktúra musí byť zachovaná tak ako je.
A čo sa týka, výpočtu celkového času, s ktorým už vo výslednej tabuľke nerátam, aj tam došlo k zmene.
3)Čo sa týka počtu pracovných alebo kalendárnych dní...
Ja viem, že to nie je presné.
Počítame výkony za kalendárne dni, ale preďelujeme počtom pracovných dní... (Vedúcej to takto stačí.)
Ak príde iné usmernenie, potom to budem riešiť.
Nebantujem. Neriešte.
Taktiež som postupom času prišla nato, že nepotrebujem časované makro. Makro Ďalší mesiac vyvolávam podľa potreby.
DOPLNENIE
Neviem, či sa niečo medzi sebou nebije, ale po zápise v stĺpci E, nemôžem urobiť krok späť. (Ani po zrušení makra uložiť, pri prepnutí listu)
V zozname a spotrebe mi to nerobí, iba na odd.
elninoslov napsal/a:
Vy keď chcete ukladať zošit (nie List), tak použite to prvé makro. To je na zošit. To druhé si ani nevšímajte.
Asi sme sa nepochopili, nechcem ukladať samostatne zo zošita jeden list. Stále sa jedná o ten istý súbor. Teda o ukladanie informácií pri prepnutní z listu do listu v jednom zošite.
Máte pravdu, to prvé makro je pre mňa dobré.
Funguje ako má.
Ste programátor, máte inú logiku chápania ako ja .... :)
Ale vďaka aj za to druhé makro, určite sa mi v budúcnosti môže zísť.
Pavlus napsal/a:
Co myslíte tím, že je to "zacyklené"? Spíše máte na mysli, že makro (resp. událost sešitu) trvá moc dlouho. P.
Samozrejme, presne tak zacyklené v zmysle, že trvá dlho, áno príkazov som dala viac, nevedela som, že stačí 1. Zmazala som, funguje.
elninoslov napsal/a:
Netreba to ukladať vždy pri prepnutí, ale iba ak došlo k nejakej zmene. ??? Myslíte skutočne list ? Nie náhodou zošit ? Ak list, tak to je niečo úplne iné
Áno list, hárok, nie zošit.
Ukladať iba keď dôjde k zmene je dobý nápad, pôvodne taký bol plán, len som ho ešte nedotiahla do konca.
Vďaka, otestujem.
.SaveAs sName & ".xlsx", xlOpenXMLWorkbook
Upravila som, toto som vyhodila,lebo mi to ukladalo ako samostatné zošity. Len, keď som to vyhodila, tak ukladá a msgbox vyskakuje pri prepnutí listu aj keď nedôjde k žiadnemu zápisu v liste, ale aj tak vďaka, spĺňa to účely.
Našla som si makro, ktoré som si prispôsobila, upozorňuje ma na prechod z listu do listu. Ešte som k tomu pridala akciu, aby pred prepnutím predchádzajúci list uložilo.
Makro ukladá, len je to trochu zacyklené, nakoľko neovládam syntax.
elninoslov napsal/a:
Ale týmto už končím. Uznajte sama...
ok, vďaka, teraz je to ok
elninoslov napsal/a:
Celé prekopané, keď bude niekedy čas, tak Vám možno to makro aj popíšem.Příloha: 41870_tabulka-pred-a-po-makre-2.zip (33kB, staženo 1x)
Ďakujem
Len mám jeden problém V stĺpci A (ČAS) máme formát: dd.mm.yyyy h:mm – 12.11.2018 8:00 - makro ho prekonvertuje na obyčajné číslo
ešte jedna úprava, údaje v stĺpci P a Q (začiatok koniec)robíme bez úpravy - netučné, bez kurzívy, nefarebné
Ale ako hvoorím, formáty sa v jednej bunke môžu biť (môžu byť aj tučné), takže niečo si už dotiahneme ručne.
elninoslov napsal/a:
Nejde mi to stiahnuť. Píše "stránka nenalezena". Pošlite mi to mailom, alebo to dajte na GoogleDrive, či niekam inam. Uvidím, kedy na to vyjde čas, možno zajtra ...
zaujímavé, aj mne to vypisuje... ok poslala som na gmail.
pridala som súbor aj na GD:
https://drive.google.com/file/d/1m5SEa1B1fs2dI3_ZJgHpxuQXSSHMaMTV/view
1)Áno makro má pridať 2 stĺpce, tie pred vykonaním makra tam nie sú.
2)Áno, Premennú Text („Začiatok hod. Koniec hod.“) som zmazala, lebo sa už do stĺpca O:O nebude pridávať.
3)Áno, COLOR_KONIEC je tým pádom zbytočná
4)Do stĺpcov P a Q sa bude pridávať čas.
5)Zachovať formátovanie v zmysle,
a) zahrnúť stĺpec P a Q do orámovania.
(čo v makre je zachované)
b)rovnako zachovať podmienený formát v oblasti A:O
(čo je v makre tiež zachované)
c)poznámka- formátovaná kurzívou
d)rovnako aj orámovať prvý riadok, ktorý nie je po spustení makra orámovaný.
Ešte poznámka: TEXT "Začiatok" "Koniec"sa vloží len do bunky P2 a Q2. (chybička se vloudila)
Tabuľka sa importuje čistá, bez akýchkoľvek úprava a bez Názvu v prvom riadku.
Ešte pred spustením makra pridáme prvý riadok (Názov)
Rovnako sa "poznámka" môže nachádzaj aj v bunke "dodatok", ktorá by mala byť formátovaná kurzívou. Ale nakoľko predpokladám, že by sa tie formáty v makre bili, takto ani nežiadam.
Dúfam, že v tomto súbore to bude jasnejšie.
Ďakujem za pomoc.
Nebudem zakladať novú tému, nakoľko sa jedná o ten istý súbor. Poprosila by som menšiu úpravu makra.
Prišla nová požiadavka z vedenia na aktualizáciu evidencie.
Pôvodná tabuľka končí stĺpcom O.
Potrebujem makrom pridať ešte dva stĺpce
P (Začiatok) a Q (Koniec)
( V ukážke je len čas tabuľky)
A zachovať formátovanie tak ako je, len ho aplikovať aj na stĺpce P a Q.
xlnc napsal/a:
Do těla mailu, šmarjá panno...
som tušila, že na strane príjemcu bude problém, takže prezentácia veľmi nerieši môj problém...
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