Trova Cognome e Nome vba

Question

Salve, ho una tabella in cui sono elencate delle persone

devo solo verificare se una persona è presente in questa tabella; quindi, il risultato deve restituire Vero/Falso che utilizzerò in una condizione IF

questa tabella è caratterizzata dell'avere una colonna COGNOME e una colonna NOME

quindi è una ricerca a più criteri

Answer 1

Ciao Antonio,

Norman quando puoi dai un occhiata perchè mi si blocca persino alla definizione del ListObject

Ad occhio, sostituisci l'istruzione problematica con:

Set oTabellaCal1 = Workbooks("CALENDARIO.xlsm").Worksheets("Calendario").ListObjects("CALENDARIO")

===

Regards,

Norman

:

Answer 2

Ciao Antonio,

Questa verifica deve essere scritta in vba, in quanto sono 2 le cartelle di lavoro aperte

Nella prima cartella ho un userform che interroga e verifica la seconda cartella in caso di esito negativo/positivo aziona due automatismi differenti

Prova una funzione del genere:

'========>>

Option Explicit

'-------->>

Public Function Dipendente_Trovato(rTabella As Range, Nome As String, Cognome As String) As Boolean

Dim arrTabella As Variant 

Dim i As Long 

arrTabella = rTabella.Value  

For i = 1 To UBound(arrTabella) 

    If arrTabella(i, 1) = Nome And arrTabella(i, 2) = Cognome Then 

        Dipendente\_Trovato = True 

        Exit Function 

    End If 

Next i 

End Function

'-------->>

Sub Demo()

MsgBox Dipendente\_Trovato(Range("A5:B28"), "Claudia", "Rossi 3") 

End Sub

'<<========

Io ho provato la funzione con una tabella del genere:

===

Regards,

Norman

Answer 3

ciao

lascio agli esperti VBA

il divertimento😀

ma se gli alleghi due similfile

con dati ridotti secondo me li faciliti.

Anche se onestamente sono sempre meravigliato di come Norman

riesca a rispondere senza vedere i file.

Answer 4

Ciao Gianfranco

Questa verifica deve essere scritta in vba, in quanto sono 2 le cartelle di lavoro aperte

Nella prima cartella ho un userform che interroga e verifica la seconda cartella in caso di esito negativo/positivo aziona due automatismi differenti

Answer 5

ciao

ti basta un indice confronta

un matr.Somma.prodotto()

un conta.se()

se alleghi una tabella con pochi nomi e la struttura

riusciamo ad aiutarti meglio