Pegar valores, configurar página

27/02/2006 - 18:55 por navibel | Informe spam
Hola amigos: Dos preguntas

1:- Tengo un macro que suma valores de varios celdas ¿Habría l
aposibilidad de ver en la barra de formulas los valores que pega, no lo
resultados?. O sea, si pego valores 5+3, no quiero ver 8, sino =5+3

2.- ¿Como hago para que una macro me configure una página
ajustándola automaticamente a una sola hoja? Con la grabadora de
macros no lo consigo

Gracias por vuestras respuestas
 

Leer las respuestas

#1 Héctor Miguel
28/02/2006 - 06:41 | Informe spam
hola, Guillermo / Vulcano / Navibel / todavianosequeponer / madoli / alonso / -mas los que vengan- :D

1:- Tengo un macro que suma valores de varios celdas
posibilidad de ver en la barra de formulas los valores que pega, no lo resultados?.
O sea, si pego valores 5+3, no quiero ver 8, sino =5+3

2.- Como hago para que una macro me configure una pagina ajustándola automaticamente a una sola hoja?
Con la grabadora de macros no lo consigo



1) sin conocer 'como' es que tu macro 'va sumando' los valores de las varias celdas :-)) ...
[p.e.] suponiendo que en la celda 'A1' vas a depositar los valores tomandolos de las celdas 'B5', 'D10' y 'C27'
Sub Valores_de_celdas()
Dim Celda As Range, Valores As String
For Each Celda In Range("b5,d10,c27")
If Valores <> "" Then Valores = Valores & "+"
Valores = Valores & Celda
Next
Range("a1") = "=" & Valores
End Sub

2) puedes 'depurar' el codigo que genera la grabadora de macros y 'dejar' [solo] las instrucciones 'importantes' [p.e.]
With ActiveSheet.PageSetup
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With

-> si necesitas que al numero de paginas 'ajustable' en alto [tall] o ancho [wide] sea 'automatico/variable...'
establece su valor como 'False'

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Preguntas similares