< návrat zpět

MS Excel


Téma: Automatická kontrola a vyplňování rss

Zaslal/a 5.12.2016 15:21

Zdravím, chtěl bych požádat o pomoc s řešením Excelu. Vysvětlení nejlépe na příloze, na listu Kontrola zadám do A2 kód, následně se provede kontrola, zda se tento kód nachází ve sloupci A listu Databáze. Pokud ano, zobrazí se na listu Kontrola v buňce B2 odpověď ANO (pokud tam není tak NE) a následně se ověřovaný kód (pokud je ověření úspěšné) vyplní do první volné buňky ve sloupci A listu Výsledky a na stejném řádku ve sloupci B se vyplní datum, kdy se tento kód úspěšně ověřil. Kódy se mohou ověřovat opakovaně, vždy vznikne nový zápis na listu Výsledky. Nenapadá vás, jak toto udělat? Předem moc díky.

Příloha https://ulozto.cz/!V5Mts39boocF/excel-priklad-xlsx

Zaslat odpověď >

#033691
avatar
1.) Kontrolu, zda je v databázi, lze provést s využitím funkcí JE.CHYBHODN a SVYHLEDAT.
=KDYŽ(JE.CHYBHODN(SVYHLEDAT(A2;Databáze!A:A;1;NEPRAVDA));"Ne";"Ano")2.) Zapisování na list Výsledky pak lze udělat přes událost listu ve VBA.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim volny_radek As Long

If (Target.Address = "$A$2") And Range("B2").Value = "Ano" Then
volny_radek = Sheets("Výsledky").Range("A100000").End(xlUp).Row + 1
Sheets("Výsledky").Cells(volny_radek, 1).Value = Range("A2").Value
Sheets("Výsledky").Cells(volny_radek, 2).Value = Date
End If

End Sub
P.citovat
icon #033695
eLCHa
@Pavlus
Jestli můžu, tak 2 technické poznámky

1) pokud potřebujete pouze zjistit, zda se nějaká hodnota vyskytuje v jiném seznamu a nikoliv její pozici, použijte COUNTIF(S) > 0. Je to snazší na konstrukci, není třeba ošetřovat chyby a snadno se přidávají další podmínky.
2) pokud použijete objekt tabulka, tak se obejdete bez takovýchto konstrukcíSheets("Výsledky").Range("A100000").End(xlUp).RowAle berte jen jako tipycitovat
#033697
avatar
Moc díky za ochotu a pomoc, vše funguje přesně jak potřebuji!citovat

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

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09