none
CREAR MACRO PARA EXCEL RRS feed

 > 

  • Pregunta

  • Question
    Inicie sesión para votar
    0
    Inicie sesión para votar

     

    Me podria alguien facilitar una macro que seleccione todas las celdas de una misma columna los multiplos de 4. Lo necesita mi padre para el curro y me ha pedido que lo poste  aqui.

     

    Muchisimas gracias

    jueves, 25 de octubre de 2007 22:32
    |

Respuestas

  • Question
    Inicie sesión para votar
    0
    Inicie sesión para votar
    Chico, encontre un ejemplo hace dias de como sobrear las celdas esta en la ayuda en linea de excel

    este es el codigo de la macro que proporciona microsoft, analizalo y creo que puedes construir lo que estas solicitando

    Option Compare Text
    Sub LoopRange2()

    'Indique a VBA que la variable MyCell variable es un intervalo
    Dim MyCell As Range
    'Repita usando For Each…Next en la selección
    For Each MyCell In Selection
    If MyCell.Value Like "*Book*" Then
    'Establezca el color de fondo de la celda como rojo
    MyCell.Interior.ColorIndex = 3
    ElseIf MyCell.Value Like "*Movie*" Then
    'Establezca el color de fondo de la celda como verde
    MyCell.Interior.ColorIndex = 4
    ElseIf MyCell.Value = "" Then
    'Elimine el color de fondo de la celda
    MyCell.Interior.ColorIndex = xlNone
    Else
    'Establezca el color de fondo de la celda como azul
    MyCell.Interior.ColorIndex = 5
    End If
    Next

    End Sub


    • Marcado como respuesta Ismael Borche miércoles, 6 de abril de 2011 15:01
    jueves, 29 de noviembre de 2007 16:53
    |

Todas las respuestas

  • Question
    Inicie sesión para votar
    0
    Inicie sesión para votar

    ¿seleccionar los números que sean múltiplos de 4, o los números que se encuentren en una celda con número de fila múltiplo de 4?

    viernes, 26 de octubre de 2007 18:26
    |
  • Question
    Inicie sesión para votar
    0
    Inicie sesión para votar
    Chico, encontre un ejemplo hace dias de como sobrear las celdas esta en la ayuda en linea de excel

    este es el codigo de la macro que proporciona microsoft, analizalo y creo que puedes construir lo que estas solicitando

    Option Compare Text
    Sub LoopRange2()

    'Indique a VBA que la variable MyCell variable es un intervalo
    Dim MyCell As Range
    'Repita usando For Each…Next en la selección
    For Each MyCell In Selection
    If MyCell.Value Like "*Book*" Then
    'Establezca el color de fondo de la celda como rojo
    MyCell.Interior.ColorIndex = 3
    ElseIf MyCell.Value Like "*Movie*" Then
    'Establezca el color de fondo de la celda como verde
    MyCell.Interior.ColorIndex = 4
    ElseIf MyCell.Value = "" Then
    'Elimine el color de fondo de la celda
    MyCell.Interior.ColorIndex = xlNone
    Else
    'Establezca el color de fondo de la celda como azul
    MyCell.Interior.ColorIndex = 5
    End If
    Next

    End Sub


    • Marcado como respuesta Ismael Borche miércoles, 6 de abril de 2011 15:01
    jueves, 29 de noviembre de 2007 16:53
    |