Quisiera saber el código VBA para convertir un número almacenado como texto, para convertirlo a número.
Lo necesito porque en este bucle:
Código:
No me los compara bien.For i = 2 To numRows(1) For j = 2 To numRows(2) 'MsgBox Worksheets(2).Range("C" & i).Value 'windows(myBook(i)). If (Workbooks(2).Worksheets(1).Range(varCellOriginalColumn & i).Value = Workbooks(3).Worksheets(1).Range(varCellDestinyColumn & j).Value) Then encontrada = True pos = j Exit For End If Next j If encontrada Then Windows(myBook(2)).Activate Workbooks(3).Sheets(1).Select valueSearch = Range(varCellDestinyCopy & pos).Value 'drawColorRow (pos) Selection.Copy Windows(myBook(1)).Activate Workbooks(2).Sheets(1).Select Range(varCellInsertColumn & i).Value = valueSearch 'drawColorRow (i) 'ActiveSheet.Paste Else Windows(myBook(1)).Activate Rows(i & ":" & i).Select Range("N" & i).Activate With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .ThemeColor = xlThemeColorAccent2 .TintAndShade = 0 .PatternTintAndShade = 0 End With End If Next i
Gracias!!!