< návrat zpět

MS Excel


Téma: zlucenie buniek do jedneho rss

Zaslal/a 22.9.2020 20:25

Pozdravujem vedel y mi niekto pomoct da sa nejak s automatizovat zlucenie buniek do jedneho. mam tabulku C5:R35 s hodnotami a niekedy sa mi v urcitom riadku s viacerych stlpcoch ocitne rovnaky text a ten by som potreboval zlucit da sa to nejak urobit tento text sa moze vyskytnut rozne pri prilepovany s ineho zosita

Příloha: zip48096_test.zip (8kB, staženo 19x)
Jméno
Kontrola
Text
  b i u s img code url hr   1 2 3 4 5 6 7 8 9 10

Strana:  1 2   další »
#048098
Merlin99
*Muzes dodat jak by mela vypada vysledna sloucena tabulka?citovat
#048100
avatar
posielam este raz ako by to malo byt pred a po. Tabulka ma stale rovnaky format len sa prilepuju hodnoty niekedy aj s textami. Tak v tomto rozmedzi keby vedelo vyhladat text a zlucit ho do jedneho nazvu
Příloha: zip48100_test.zip (9kB, staženo 21x)
citovat
#048104
avatar
To je problém v 30 riadkoch zlúčiť manuálne?
Ako príklad si dal ukážku, z ktorej vyplýva, že texty budú rovnaké vo všetkých bunkách riadka.
V tom prípade tvoje zadanie splní kód:

Sub SlouceniTextu()
Application.DisplayAlerts = False
For i = 5 To 35
If Not (IsNumeric(Range("C" & i))) Then
With Range("C" & i & ":R" & i)
.Merge
.HorizontalAlignment = xlCenter
End With
End If
Next i
End Sub


P.S. ak máš menej než 80 rokov, tak by som popracoval na gramatike...citovat
#048105
avatar
Aby to voči manuálnemu spôsobu malo význam, je vhodné umiestniť v zošite spúšťacie tlačidlo.
Pokiaľ máš Excel 2007 alebo vyšší, zošit musí mať príponu "xlsm"citovat
#048107
avatar
Prípadne pre automatické spúšťanie po vykonaní zmeny v hárku treba kód umiestniť do modulu príslušného hárka a priradiť udalosti zmeny v tomto hárku, čiže:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.DisplayAlerts = False
For i = 5 To 35
If Not (IsNumeric(Range("C" & i))) Then
With Range("C" & i & ":R" & i)
.Merge
.HorizontalAlignment = xlCenter
End With
End If
Next i
End Subcitovat
#048122
avatar
Dakujem super funguje to a este jedna otázka neda sa to upravit len na tie riadky s textom a prazdne riadky nezluci tie ostanu povodnecitovat
#048123
avatar
Ale veď to zlučuje len riadky, v ktorých je textcitovat
#048124
avatar
Tie zluci ale zlucuje aj prazdne riadky co su a tie by potreboval mat povodnecitovat
#048126
avatar
zlučuje aj prázdne riadky??????
Pošli súbor so zlúčenými prázdnymi riadkami...citovat
#048127
avatar
Ked upravujem povodnu tabulku co som tu dal ako prve ide to v pohode ale ked dam napr akokolvek prilepit hodnoty alebo tu istu tabulku s ineho zosita tak mi zlucuje aj prazdne riadky
Příloha: zip48127_test.2.zip (23kB, staženo 15x)
citovat

Strana:  1 2   další »

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09