
Set RigaA = wbdest.Sheets(Foglio).Range(wbdest.Sheets(Foglio).Cells(8, 3), wbdest.Sheets(Foglio).Cells(Lr1, 3)).Find(sh1.Cells(12, 17), LookIn:=xlValues, LookAt:=xlWhole)
If RigaA Is Nothing Then |
| scossa's web site |
| Se tu hai una mela, ed io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw) |
Set RigaA = wbdest.Sheets(Foglio).Range(wbdest.Sheets(Foglio).Cells(8, 3), wbdest.Sheets(Foglio).Cells(Lr1, 3)).Find(CDbl(sh1.Cells(12, 17).Value), LookIn:=xlFormulas, LookAt:=xlWhole) |
