Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

bajar filas para ir pasando macro

17/04/2004 - 09:15 por Jesús Román | Informe spam
Ayuda Hacer una pregunta
Hola familia! Buen fin de semana a todos

me acabo de crear la siguiente macro, pero me gustaria que una vez que me ha
mirado la fila correspondiente a las celdas BB3 y E3, me corriera el turno a
las siguientes hacia abajo, es decir, me mire bb4 y e4 y así sucesivamente
hasta llegar a la celda vacia.

Sub minimo()
If Range("BB3").Value = Range("E3").Value Then
Range("AX3").Select
Macro13
With Selection
.ClearComments
.AddComment
.Comment.Visible = False
.Comment.text text:="Maximo 89 dias.-"
End With
End If
End Sub



gracias anticipadas.-
email Siga el debateRespuesta 4 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 fernando
17/04/2004 - 09:45 | Informe spam
Hash: SHA1

Esto te puede servir

' para saber la ultima fila de la hoja
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate
UltimaFilaHoja = ActiveCell.Row

For Fila = 3 To UltimaFilaHoja

If Cells(Fila, 1).Value = Cells(5, 3) Then 'la celda e3 es
la 5,3
MsgBox "encontrado" ' aqui lo que quieres hacer
End If

Next




"Jesús Román" <CRISONIA3(texto inactivo)@terra.es> escribió en el
mensaje news:1Q4gc.4565256$
Hola familia! Buen fin de semana a todos

me acabo de crear la siguiente macro, pero me gustaria que una vez
que me ha mirado la fila correspondiente a las celdas BB3 y E3, me
corriera el turno a las siguientes hacia abajo, es decir, me mire
bb4 y e4 y así sucesivamente hasta llegar a la celda vacia.

Sub minimo()
If Range("BB3").Value = Range("E3").Value Then
Range("AX3").Select
Macro13
With Selection
.ClearComments
.AddComment
.Comment.Visible = False
.Comment.text text:="Maximo 89 dias.-"
End With
End If
End Sub



gracias anticipadas.-



Preguntas similares

 

Busqueda sugerida :