Poner dos caracteres delante de otros en todas las celdas
Hola necesito por favor una macro para poner los caracteres ".- " delate de todas las celdas de de cinco en cinco filas es decir empiezo en la fila 2 la siguiente fila donde habría que poner los caracteres seria 7 la siguiente 12 la siguiente 17 y asi hasta 1000. En todas en la columna D.
gracias.-
1 Respuesta
Esta es tu solución. Posiciónate en la primera celda de esa columna y después ejecuta esta macro:
Sub guion() Do While ActiveCell.Value <> "" ActiveCell.Value = Format(ActiveCell, "@") ActiveCell.Value = "-" & ActiveCell.Value ActiveCell.Offset(1, 0).Select Loop End Sub
recuerda finalizar y puntuar
Hola amigo, esta macro lo que hace es poner un güin en todas las filas y yo solo debo de poner el ".-" (punto y guion y un espacio" en las filas 2,7,12,17 hasta 1000 (es decir fila 2 al principio del texto que hay ahora ".- " en la fila 7 otro ".- " en la fila 12 otro y asi en las filas que hay entre medias no puedo poner nada, mira por favor si puedes modificar la macro en ese sentido.
gracias,.
Cierto!, olvidé un detalle: De igual manera posicionate en la primera celda de esa columna y ejecuta esta macro
Sub guion() Do While ActiveCell.Value <> "" ActiveCell.Value = Format(ActiveCell, "@") ActiveCell.Value = ".-" & ActiveCell.Value ActiveCell.Offset(5, 0).Select Loop End Sub
