Faltou detalhar um pouco mais sua dúvida, anexar uma pasta de trabalho com algumas células preenchidas ajudaria muito.
Mas se é que entendi direito, vc quer que as fórmulas ocupem T2, U3, V4, W5... e assim sucessivamente, até que existam dados na coluna S, desde S2 prá baixo. Além disso, a fórmula em:
T2 =SE($S3=$S2;1;0)
U3 =SE($S4=$S3;1;0)
V4 =SE($S5=$S4;1;0)
W5 =SE($S6=$S5;1;0)
ou seja, sempre comparando a célula em S imediatamente abaixo com a célula em S da linha em que está a fórmula. É isso?
Se for, uma forma de fazer seria usando uma macro como abaixo:
Sub MarcOlive()
Dim rgS As Range, rgFormula As Range
Dim lin As Long, strFormula As String
Set rgS = ActiveSheet.Range("S2", Range("S2").End(xlDown))
Set rgFormula = rgS(1)
For lin = 1 To rgS.Rows.Count
strFormula = "=SE($S" & rgS(1).Row + lin & "=$S" _
& rgS(1).Row + lin - 1 & ";1;0)"
rgFormula.Offset(lin - 1, lin).FormulaLocal = strFormula
Next lin
End Sub
Saudações e Boas Festas!
Postado : 21/12/2015 10:14 pm