Autonumerar celdas
Estuve leyendo que ayudaste a jose con el problema de autonumerar celdas; lo que necesito saber es como hacer para que dentro de una misma hoja se autoenumere una celda de distintas páginas (ej. Arranca la página 1 en la ubicación h7 y cada 25 celdas hacia abajo tiene que autoenumerarse indefinidamente).
Y otra duda es como sumar una sola celda de cada página (ej.: en una celda determinada quiero sumar la celda H18 con las celdas que se encuentran cada 25 celdas hacia abajo indefinidamente)
Gracias. Saludos Cordiales
Y otra duda es como sumar una sola celda de cada página (ej.: en una celda determinada quiero sumar la celda H18 con las celdas que se encuentran cada 25 celdas hacia abajo indefinidamente)
Gracias. Saludos Cordiales
1 respuesta
Respuesta de Elsa Matilde
1
Como no sé en qué momento o con qué rutina harás esto, te dejo algunas instrucciones explicadas para que la puedas armar:
Si esto va para todas las hojas necesitas 1 bucle que las recorra.
For each hoja in Sheets
hoja.select 'se posiciona en la primer hoja
'ahora otro bucle para llenar las celdas
activesheet.range("H7").select
valor = 1 'ajustar el valor que tomará la primer celda
for i = 7 to 65536 step 25
activesheet.range("H" & i) = valor
valor = valor+1
next i
next hoja
Para sumar 1 sola celda reemplaza la línea que dice valor = 1 por la sgte :
valor = Sheets("tu_hoja").range("H18") 'ajustá el nbre de hoja
y luego quitá la línea que incrementa esta variable en 1 (valor = valor+1)
Armalo, pruébalo y comentame si todo quedó resuelto.
Si esto va para todas las hojas necesitas 1 bucle que las recorra.
For each hoja in Sheets
hoja.select 'se posiciona en la primer hoja
'ahora otro bucle para llenar las celdas
activesheet.range("H7").select
valor = 1 'ajustar el valor que tomará la primer celda
for i = 7 to 65536 step 25
activesheet.range("H" & i) = valor
valor = valor+1
next i
next hoja
Para sumar 1 sola celda reemplaza la línea que dice valor = 1 por la sgte :
valor = Sheets("tu_hoja").range("H18") 'ajustá el nbre de hoja
y luego quitá la línea que incrementa esta variable en 1 (valor = valor+1)
Armalo, pruébalo y comentame si todo quedó resuelto.
TE recuerdo que deberás finalizar esta consulta para poder ingresar nuevas. Si algo no quedó claro o solucionado, escribime nuevamente.
