» Poradna » Programy

Excel VBA - čtení posledního záznamu ze seznamu

 |   |  Microsoft Windows 7 IE 9.0

Zdravím,potřeboval bych poradit se zdrojovým kodem v VBA.Potrebuji aby mi makro zkontrolovalo zda v bunce Matnr je zadána hodnota, která už byla vytvořena předtím.Můj kod je následující: For Row = 1 To 500 Set Bunka = Range("C6").Offset(Row + 1, 0) If Bunka.Value = Matnr Then Err2 = MsgBox("Hodnota " & Matnr & " je jiz s seznamu " & Chr(13) & "Prejete si zaznam pridat?", vbYesNo + vbQuestion) If Err2 = vbNo Then Cells(2, 3) = "" Cells(3, 3) = 0 Range("c2").Select End Exit For End If End If Next Row

Odpovědi na otázku

 |   |  Microsoft Windows 10 IE 11.0

Moc uplne nechapu, co chcete udelat... potrebujete zjistit, jestli zadana hodnota není uz v nejakem sloupci?

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 7 IE 9.0

Už jsem si na to přišel, díky :D.Problém byl v nastavení funkce OFFSET

Souhlasím  |  Nesouhlasím  |  Odpovědět

Související témata: Offset




Určitě si přečtěte

Takhle zemřete, když asteroid dopadne na vaše město

Takhle zemřete, když asteroid dopadne na vaše město

** Jak by to dopadlo, kdyby na světovou metropoli či do nedalekého moře dopadl velký asteroid? ** Simulovali to odborníci z University of Southampton ** Výsledky jsou velmi zajímavé

Petr Kubala | 32

Sex a rozmnožování při mezihvězdné cestě: Kolik lidí je potřeba pro let k Proximě Centauri?

Sex a rozmnožování při mezihvězdné cestě: Kolik lidí je potřeba pro let k Proximě Centauri?

** Vědci spočítali, jak velká by musela být posádka pro vícegenerační let k nejbližší hvězdné soustavě ** Proxima Centauri se nachází 4,3 světelných let od nás ** Za současných technologií bychom k ní letěli 6300 let

Petr Kubala | 53

Rekordy počasí: V Česku to ještě jde, skutečné extrémy zažívají jinde

Rekordy počasí: V Česku to ještě jde, skutečné extrémy zažívají jinde

** Teplotní extrémy dokážou překvapit. Seznamte se s rekordy v Česku i ve světě ** Rekordní hodnoty jsou mnohdy až k neuvěření ** Zjistěte, kdy ke bylo největší horko, zima, déšť či vítr

Karel Kilián | 7

Nechcete platit za Total Commander? Těmito bezplatnými programy ho můžete nahradit

Nechcete platit za Total Commander? Těmito bezplatnými programy ho můžete nahradit

** Total Commander je na Windows takřka legendou ** Licence však stojí více než tisíc korun ** Našli jsme pro vás deset alternativ dostupných zdarma

Karel Kilián | 141


Aktuální číslo časopisu Computer

Velký test 18 bezdrátových sluchátek

Vše o přechodu na DVB-T2

Procesory AMD opět porážejí Intel

7 NVMe M.2 SSD v přímém souboji