Selezione celle con macro

Hai un problema con Excel?

Nuova discussione

Selezione celle con macro
di Lloyd91 data: 24/03/2010
Salve a tutti, vado dritto al sodo.
sto cercando di fare un "cerca verticale" e un confronto. mi spiego meglio; dovrei far fare ad una macro il cerca verticale della colonna g13 e poi confrontarla con c5 e poi dovrebbe controllare nella colonna b il valore che si avvicina di più a zero nella colonna j.
il codice che ho inserito è quello sottostante, ma non riesco a far partire le macro, potete aiutarmi?

Sub Seleziona()
Worksheets("Foglio1").Activate
Selection.Offset(1, 0).Range("A1").Select
End Sub

Sub Confronta()
Foglio1.Range("g13").Select
inizio
If Foglio1.Range("c5") > ActiveCell Then
MsgBox ("trovato")
diam = ActiveCell.Offset(0, -5).Value
messaggio = "il diamentro cercato è " & diam
MsgBox (messaggio)
Else
Seleziona
GoTo inzio
End If
End Sub

di Enzo (utente non iscritto) data: 26/03/2010
Se alleghi un file e' meglio
di Gozz (utente non iscritto) data: 26/03/2010
Fatto ora è allegato xd
di Ricky53 data: 28/03/2010
Caio,
non mi è chiaro quello che hai scritto.
comunue prova la macro seguente che contiene alcune mie correzioni:

sub confronta()
foglio1.range("g13").select
inizio:
if foglio1.range("c5") > activecell then
msgbox "il diamentro cercato è " & activecell.offset(0, -5).value
else
seleziona
goto inizio
end if
end sub

ciao da ricky53
di Enzo (utente non iscritto) data: 29/03/2010
Saluto ricky
ma il file dov'e'?
di Ricky53 (utente non iscritto) data: 29/03/2010
Ciao enzo,
ricambio i saluti.

dopo alcuni giorni viene cancellato automaticmente dal sistema.

ciao da ricky53
di Gozz91 (utente non iscritto) data: 29/03/2010
L'ho rilegato

Vuoi Approfondire?