Pepito=Pepito +1

hola, Des !
_____

"> sencillo ? [basicamente] porque la aplicacion *lo anula* [de cara y solo] en la interfase con el usuario

**este es uno de los puntos que yo pretendí analizar para intentar ver que es lo que pensaron en la casa grande al diseñar el programa.
Lo que yo vi es que NO solo lo anula cara al usuario.
Cuando descombinas las celdas no queda nada que no estuviera en la primera celda
(y hasta donde se tampoco en variables internas de excel, salvo para deshacer, que se pierden al guardar la hoja.).

=> OJO: los datos de 'las otras celdas'... se pierden [pero] NO al 'des-combinarlas'... sino JUSTO al momento de combinarlas
-> y excel te lo advierte cuando combinas rangos cuyas 'otras celdas' contienen datos... de ahi en adelante... :-((
_____

Si quieres de otra forma, las otras celdas, al menos como yo las utilizo, son inutiles.
No puedo hacer nada con ellas en el estado de "combinadas", por lo que Pepito=Pepito + 1 tendria sentido.

=> totalmente de acuerdo, y [personalmente] procuro comentar al respecto cuando exponen que usan celdas combinadas <\°|°/>
en cuanto a que Pepito=Pepito + 1 tendria sentido... [supongo que] el mismo que los rangos a los que se refiere Pepito:
Hoja1.range(cells(1,1), cells(1,6)) = Hoja1.range(cells(1,1), cells(1,6)) + 1
_____

Por otro lado si lo comparamos con la posibilidad de que pepito fuera solo la primera celda del rango
hicieramos la operacion Pepito = Pepito +1 y luego combinaramos todo el rango (Otra posibilidad de hacerlo)
quizas justificara la expectativa de que se pudiera hacer la operacion en estado de combinacion

=> talco...mo te lo comentaba en el mensaje anterior...
op1: si la variable ES el rango combinado... -> Pepito.Cells(1) = Pepito.Cells(1) + 1
op2: si prefieres 'asignar' la variable DESPUES de haber combinado el rango [p.e.]...
Sub Otro_Pepito()
Dim Pepito As Range
Hoja1.Range(Cells(1, 1), Cells(1, 6)).Merge
Set Pepito = Hoja1.Range(Cells(1, 1), Cells(1, 6)).Cells(1)
Pepito = Pepito + 1
End Sub

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

Hola Héctor.

> Cuando descombinas las celdas no queda nada que no estuviera en la primera celda
=> OJO: los datos de 'las otras celdas'... se pierden [pero] NO al 'des-combinarlas'... sino JUSTO

al momento de combinarlas
Sí tienes razón,pero te decia que no queda nada, no que se vorraran en el hacto de descobinar.

=> totalmente de acuerdo, y [personalmente] procuro comentar al respecto cuando exponen que usan

celdas combinadas <\°|°/>
¿esa es la cara que me ves?,
Y yo que quería que no se notase, que le voy a hacer.
Pero te gano, yo me la veo muy a menudo.

Hoja1.Range(Cells(1, 1), Cells(1, 6)).Merge
Set Pepito = Hoja1.Range(Cells(1, 1), Cells(1, 6)).Cells(1)
Pepito = Pepito + 1

Ya está solucionado, pero para estudio lo voy a modificar a este formato en cuento pueda

saludos
Des

hola, Des !

=> totalmente de acuerdo, y [personalmente] procuro comentar al respecto cuando exponen que usan celdas combinadas <\°|°/>

esa es la cara que me ves?,
Y yo que queria que no se notase, que le voy a hacer.
Pero te gano, yo me la veo muy a menudo.

por supuesto que no... *esa* es la cara que [yo] les pongo cuando comentan que [ab]usan de las celdas combinadas :D

Hoja1.Range(Cells(1, 1), Cells(1, 6)).Merge
Set Pepito = Hoja1.Range(Cells(1, 1), Cells(1, 6)).Cells(1)
Pepito = Pepito + 1

Ya esta solucionado, pero para estudio lo voy a modificar a este formato en cuento pueda

yo preferiria la *version corta*: -> Pepito.Cells(1) = Pepito.Cells(1) + 1

saludos,
hector.

Hola Héctor.

>> Hoja1.Range(Cells(1, 1), Cells(1, 6)).Merge
>> Set Pepito = Hoja1.Range(Cells(1, 1), Cells(1, 6)).Cells(1)
>> Pepito = Pepito + 1

yo preferiria la *version corta*: -> Pepito.Cells(1) = Pepito.Cells(1) + 1

Así será
.
Pero, si no te importa, utilizaré las dos para tener una posibilidad de analisis posterior, por si
las moscas.

Saludos
Des