MS Excel

Si presvedčený, že ti to zlučuje prázdne riadky (presnejšie: riadky, ktorých bunka v stĺpci C je prázdna)?
Lebo ja nie.
Ona totiž nie je prázdna. A pritom nejde o to, že v skutočnosti tam vlepuješ vzorec...
Výsledok, toho vzorca, ktorý tam vlepuješ, totiž nie je prázdny obsah, ale medzera. To je iná situácia.
Stačí?
Takže si uprav makro na nasledujúce:
Sub SlouceniTextu()
Application.DisplayAlerts = False
For i = 5 To 35
If Not (IsNumeric(Range("C" & i))) And Range("C" & i) <> " " Then
With Range("C" & i & ":R" & i)
.Merge
.HorizontalAlignment = xlCenter
End With
End If
Next i
End Sub


Lenže si myslím, že nerozumieš tomu, čo robíš v Exceli samotnom. Ono je tam totiž ešte množstvo záludností, ktoré ma napadajú, že u teba nastanú a na ktoré ťa ani nenapadlo upozorniť, z čoho vyplýva že súvislosti ti nič nehovoria. A za takých okolností si ťažko predstaviť zmysluplnú spoluprácu. Napr: kopíruješ odkazy na iné zdroje. Takže: má zmysel ich zachovať, ak ich nevlepuješ ako hodnoty?
Ak má zmysel ich zachovať, znamená to, že sa môže zdroj meniť. Ak sa môže meniť, kto ti popätovne rozdelí bunky a naplní ich vzorcami v prípade, že zmenené dáta budú v zlúčených riadkoch: Za ďalšie, nevieš ošetriť vzorce, aby nevracali medzeru, prípadne napĺňas bunky medzerami aby si vyriešil nejaký problém, čo je katastrofa. Za ďalšie, zlúčením sa zachová obsah prvej bunky. V tvojom prípade je to vzorec. Čiže zlúčená bunka naďalej bude obsahovať vzorec. Za ďalšie, čo ak sa v riadku vyskytne niekoľko rovnakých hodnôt ale nie všetky? A to som ešte neskončil...
Chápeš, čo som tým chcel povedať?citovat