4D v13PV SET CELL FORMULA |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D View v13
PV SET CELL FORMULA
|
PV SET CELL FORMULA ( area ; columna ; linea ; formula ) | ||||||||
Parámetro | Tipo | Descripción | ||||||
area | Entero largo |
![]() |
Área 4D View | |||||
columna | Entero largo |
![]() |
Número de columna de la celda | |||||
linea | Entero largo |
![]() |
Número de línea de la celda | |||||
formula | Cadena |
![]() |
Formula | |||||
El siguiente ejemplo crea un aumento debajo de una celda de tipo numérico. Si el valor de esta última se modifica posteriormente, el incremento se actualiza automáticamente por la acción de las fórmulas que ubicamos en las celdas con PV SET CELL FORMULA.
C_INTEGER($CopyNumber) `Número de copias a ejecutar
C_LONGINT($Column;$Row) `Coordenadas de la celda a copiar
C_INTEGER($Index) `Indice de bucle
C_TEXT($Name) `Nombre de la celda de inicio
PV GET CURRENT CELL(Area;$Column;$Row)
If(PV Get cell value type(Area;$Column;$Row)=pv number type value) `Verificación del tipo
`5 por defecto
$CopyNumber:=Num(Request("¿Cuántas celdas hacia abajo desea incrementar?";"5"))
If($CopyNumber>0) `Validar
$Name:=PV Get cell name(Area;$Column;$Row) `Recuperación del nombre
If($Name="") `¿Sin nombre?
$Name:="COL"+String($Column)+"RW"+String($Row) `Actualmente tiene uno
PV SET CELL NAME(Area;$Column;$Row;$Name) `nombre de tipo "COL2RW3"
End if
For($Index;$Row+1;$Row+$CopyNumber) `$CopyNumber bucle(s)
`Incremento
PV SET CELL FORMULA(Area;$Column;$Index;"="+$Name+"+"+String($Index-$Row))
End for
End if
Else `Tipo incorrecto
ALERT("La celda de inicio debe ser de tipo numérico")
End if
Producto: 4D
Tema: PV Valor celda
Número
15917
Lista alfabética de los comandos
Creado por: 4D View 6.8
PV Get cell formula
PV Get cell value type