Excel VBA rozšíření automatického kopírování řádku na jiný list atd.

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

stenda
nováček
Příspěvky: 1
Registrován: říjen 19
Pohlaví: Muž
Stav:
Offline

Excel VBA rozšíření automatického kopírování řádku na jiný list atd.

Příspěvekod stenda » 01 říj 2019 15:01

Dobrý den, potřeboval bych pomoct s vyladěním. Mám tabulku na zápisy z porad. Dal jsem si tam podmíněný formát, který po zapsání čísla ve sloupci "A" zažlutí buňky v řádku. Rád bych použil variantu skvělého kódu viewtopic.php?f=35&t=105537, ale nějak tomu ne a ne přijít na kloub. V případě zažlucení buněk potřebuji řádek (resp žluté buňky) zkopírovat na list "Nesplněné". Vzhledem k tomu, že takových záznamů bude v daném listu víc, bylo by dobré, kdyby se přiřadil datum (stačí jeden pro všechny záznamy z toho listu). Ten by byl v buňce "A1" a byl by převzatý z předchozího listu z buňky "B21" kam se po poradě zapíše kdy bude další porada. Při zápisu do dané rubriky v sloupci "B" a odentrování by v dané rubrice přibyl prázdný řádek. Dále při zapsání data do sloupce "F" by se daný řádek (buňky) zkopíroval do listu s poradou, který je první na řadě po daném datu.
V příloze jsem se to pokusil nasimulovat, jak by to mohlo vypadat.
Asi by to do budoucna šlo ještě trochu vymazlit, ale tohle by stačilo. VBA se začínám učit.
Prozatím moc děkuju za pomoc.

ZÁPISY Z PORAD A OSNOVY_2019 pro web.xlsx
(331.14 KiB) Staženo 97 x


Koukám, že je to asi oříšek. Koupil jsem si i knihu, ale nějak to nepobírám. :evil: :evil: :evil:

Reklama
  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Kopírování řádků s funkcí když Příloha(y)
    od Martyn20 » 20 črc 2023 16:50 » v Kancelářské balíky
    3
    1791
    od Melvidor Zobrazit poslední příspěvek
    21 črc 2023 08:41
  • Excel - filtr hyperlinku na druhý list Příloha(y)
    od mikiracan » 06 čer 2023 11:49 » v Kancelářské balíky
    2
    2438
    od mikiracan Zobrazit poslední příspěvek
    18 srp 2023 10:17
  • excel text na konec více řádků najednou Příloha(y)
    od Myerina » 03 led 2024 11:51 » v Kancelářské balíky
    5
    784
    od Zivan Zobrazit poslední příspěvek
    04 led 2024 09:42
  • odstranění automatického přepnutí na druhý monitor
    od tominaxx » 19 črc 2023 15:36 » v Windows 11, 10, 8...
    5
    1394
    od tominaxx Zobrazit poslední příspěvek
    19 črc 2023 22:45
  • Rozšíření dosahu WiFi
    od Kozoroh » 07 čer 2023 22:53 » v Sítě - hardware
    3
    1187
    od šulda Zobrazit poslední příspěvek
    08 čer 2023 01:47

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 4 hosti