Příspěvky uživatele

Ahoj, tak nakonec jsem na to přišel. Funguje to jako dynamicky nastavitelná oblast. Kdyby se to náhodou někomu hodilo...

Dim MojePolozky As Range
With Worksheets("Data")
Set MojePolozky = .Range("AC3", .Range("AC6253").End(xlUp))
End With

Combobox1.RowSource = "Data!" & MojePolozky.Address

Ahoj, potřeboval bych poradit s jednou funkcí. Vložil jsem si do rozsáhlejšího formuláře pořadová čísla (1 - ...) . Přes formulář pak mažu jednotlivé řádky a chci aby se mi pořadová čísla zařadila za sebou. Což se také děje, ale z nějakého důvodu toto řazení nefunguje na poslední řádek v tabulce. Tam číslo zůstane stejné i přes nastavený rozsah A:A. Myslím, že je kód správně, ale někde mám prostě chybu, nedalo by se alespoň upozornit na co bych se měl v kódu juknout abych to opravil? Zkusím trošku očesat formulář a vložit ho sem jakmile najdu trošku času. Předem díky za pomoc

Private Sub Smazani_zaznamu_Click()
ThisWorkbook.Worksheets(1).Activate
Dim radek, cislo, konec As Integer

'smazání označených hodnot
Selection.Delete Shift:=xlUp
cislo = cislo + 1
konec = Application.WorksheetFunction.CountA(ThisWorkbook.Worksheets(1).Range("A:A"))
For radek = 4 To konec
ThisWorkbook.Worksheets(1).Cells(radek, 1) = cislo
cislo = cislo + 1
Next radek

Možná je možná není, jde o to že s tímto výběrem budu nadále ve formluláři pracovat což by v listu nešlo.

Ahoj všichni, potřeboval bych poradit s filtrováním za použití makra a comboboxu. Potřeboval bych vyfiltrovat např. obce z vybraného okresu. Jistě by šlo použít filtrování udělat na listu, ale chtěl bych zvolit trošičku "sofistikovanější řešení" přes formulářík.

Děkuji za každou radu

To už je vyšší dívčí ale určitě to vyzkouším :) Díky

Zdravím všechny, mám problém s filtrováním jedné tabulky o 2000 záznamech v jednotlivých řádcích. Jedná se o jména příjmení. Potřeboval bych zjistit celkový počet záznamů ve sloupci. Problém je ovšem v tom, že některé záznamy se v sloupci opakují takže nelze zvolit funkci COUNT. Jediné co mě napadlo je, že výběr tak jak ho chci je ve výběru automatického filtru a z jeho nabídky nic nezkopíruju vedle. Je to docela flustrující. Promazávat duplicitní pole se mi moc nechce.

Díky za radu

Ještě jednou díky za návrh řešení. Nakonec jsem řešení poupravil o doplnění Enabled = True/False abych uživatele netrápil nějakýma hláškama.

Jistěže, díky za pomoc

Zdravím všechny, mám tabulku kde pomocí maker mažu jednotlivé řádky. Rád bych přidal ochranu jejich záhlaví (názvy jednotlivých sloupců). Když by se k tomu dala přidat i nějaká hláška, že tento řádek nelze smazat bylo by to úžasné

Ahoj asi je to triviální anebo to vůbec nejde každopádně na to nemůžu přijít.

Jde pozastavit a následné spustit (dokončit) procedura? Mám data ve formuláři, která ukládám do listu. Jde mi o to před jejich uložením se dotázat uživatele zda chce obsah formuláře vytisknout (tlačítka Ano/Ne). V případě Ano vytiskne obsah formuláře Userform.printForm , zavře formulář Tisk.hide a dokončí uložení dat v listu. V případě Ne jen zavře formulář a dokončí uložení dat v listu.
Snad jsem to vysvětlil dostatečně

Dík za pomoc

Ahoj, řešil někdy někdo velikost nebo umístění formuláře na stránce při jeho tisku. Jde toto nějak ošetřit? Například poměrným zvětšením. Tisknu pomocí metody PrintForm.

Ahoj Poki, řešení funguje bezvadně. Už se mi konečně podařilo zakomponovat jej do svého projektu. Díky za pomoc

Ahoj, chtěl bych se zeptat zda lze data do listboxu generovat automaticky. Třeba nějakým součtem count. O co se mi jedná...

Mám list ve kterém jsou v jednom sloupci data řazená za sebou v řádcích. Tyto data může uživatel podle svých potřeb přidávat nebo mazat. Nelze se tedy odkazovat na stálou oblast buněk. Nemůžu bohužel zaslat příklad protože mi v tom brání firewall. Stačilo by mě nakopnout kódem.

Děkuju za pomoc.

Nejspíš by mělo stačit při prvním otevření sešitu. Teoreticky by to mohlo být i po každém uložení nového řádku dat. Neměl by ale být problém překopírovat tento krok podle potřeb i do ostatních procedur programu. Takže stačí jen při otevření. Děkuji za pomoc

Ve stručnosti: při spuštění souboru by byl označen například první řádek (A1 až třeba F1). Uživatel by přidával další řádky pomocí formuláře pro vkládání dat. Pokud by se k nějakým chtěl vrátit a upravit je použil by tlačítko Editovat data, které získává data z myší označených buněk. Samozřejmě, že by si mohl taktéž označit jiné řádky.

Stálé označení prvního řádku by tak umožnilo uživateli editaci aniž by musel něco vybírat - tedy urychlit práci s programem. Nechci si vymýšlet, chtěl bych jen uživateli usnadnit jeho práci.

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje