document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. Dim i As Integer
  2.  
  3.   For i = 0 To 6
  4.     If Me.casillas[i, columna] <> 0 Then
  5.       Me.casillas[i, columna] = 0
  6.       Break
  7.     Endif
  8.   Next
  9.  
  10. End
');