Fórmula con argumento de texto en VBA

23/06/2004 - 05:12 por Jorge Castillo | Informe spam
Amigos del grupo:
Tengo la fórmula contar.si en castellano, countif en ingles, que quiero
hacerla funcionar en una macro, lo cierto es
que no hallo la manera de que me reconozca el argumento entre comillas, es
decir escribe CONTAR.SI(Y12:AB13;Culm) pero no pone el argumento entre
comillas y por tanto no lo lee. Envio el ejemplo a ver si pueden ayudarme.

Sub FormulaPlantilla()
'
' FormulaPlantilla Macro
' Macro grabada el 21/06/2004 '

'Las primeras funcionan perfectamente

Worksheets("Modelo").Cells(30, 32).Formula = "=" & "Sum(" & "A30:AE30" & ")"
Worksheets("Modelo").Cells(37, 27).Formula = "=" & "S37*W37"
Worksheets("Modelo").Cells(38, 27).Formula = "=" & "S38*W38"
' A partir de aquí probé con variables, con el texto directamente y no
funciona.
Dim Culm As String
Dim Rango As String
Culm = "Culminado"
Rango = "Y12:AB13"
Worksheets("Modelo").Cells(52, 1).Formula = "=COUNTIF(" & Rango & "," &
"Culminado" & ")"
End Sub
 

Leer las respuestas

#1 Héctor Miguel
23/06/2004 - 06:57 | Informe spam
hola, Jorge !

... contar.si (countif en ingles) ... en una macro ... que me reconozca el argumento entre comillas [...]
... probe con variables, con el texto directamente y no funciona.
Dim Culm As String
Dim Rango As String
Culm = "Culminado"
Rango = "Y12:AB13"
Worksheets("Modelo").Cells(52, 1).Formula = "=COUNTIF(" & Rango & "," & "Culminado" & ")" [...]



'trabajar' las comillas dobles [por codigo] para ser 'depositadas' en celdas/formulas...
es un 'juego' de dobles... triples [y a veces hasta 'cuadruples'] comillas dobles ;) [ejemplos]
[..].Formula = "=CountIf(" & Rango & ",""" & Culm & """)"
[..].Formula = "=CountIf(y12:ab13,""Culminado"")"

saludos,
hector.

Preguntas similares