Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  9 10 11 12 13 14 15 16 17   další » ... 28

prvá časť - vymeniť č za nulu sa dá cez "ďalekohľad" -hľadať a nahradiť

Excel 2007

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Not ThisWorkbook.Saved Then ThisWorkbook.Save
End Sub


Keď dám krok späť, tak je makro nefunkčné.
Zmeny uložené makrom sa vrátia späť.

Bohužiaľ to tento office umožňuje.

https://support.office.com/sk-sk/article/vr%C3%A1tenie-sp%C3%A4%C5%A5-op%C3%A4tovn%C3%A9-vykonanie-alebo-zopakovanie-akcie-84bdb9bc-4e23-4f06-ba78-f7b893eb2d28


"Zmeny môžete vrátiť späť dokonca aj po ich uložení..."

Tlačítkom? Tlačítkom spúšťaš makro?

príloha? aký office? excel 2007 má 7 podmienok podmieneného formátu a medzi nimi je aj ponuka farby

Ty nemáš čas učiť sa a chceš hotový výsledok...

Pozri... ale bez faktúry

http://qr-platba.cz/generator/

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


Strana:  1 ... « předchozí  9 10 11 12 13 14 15 16 17   další » ... 28

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Nahrazení kontingenční tabulky vzorcem

lubo • 9.6. 9:39

Nahrazení kontingenční tabulky vzorcem

elninoslov • 8.6. 19:03

Nahrazení kontingenční tabulky vzorcem

lubo • 8.6. 16:18

tisk do pdf

titus • 8.6. 14:01

Nahrazení kontingenční tabulky vzorcem

spoko33 • 8.6. 13:25

Nahrazení kontingenční tabulky vzorcem

spoko33 • 8.6. 13:24

Nahrazení kontingenční tabulky vzorcem

elninoslov • 8.6. 13:13