Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako združiti besedila več celic v besedilni polji v Excelu?

Morda je enostavno, da bi besedila več celic združili v novo celico s formulo. Ali veste, kako združiti več vrednosti celice v okvirček z besedilom (nadzor ActiveX)? Pravzaprav, metoda v tem članku vam lahko pomaga doseči.

Konkretirajte besedila več celic v besedilni polji s kodo VBA


Konkretirajte besedila več celic v besedilni polji s kodo VBA


Spodnja metoda vam lahko pomaga združiti besedila več celic v besedilni polji v Excelu.

1. V delovnem listu želite združiti več celic, tako da kliknete na polje z besedilom Razvojni > Vstavi > Text Box (nadzor ActiveX). Prikaz slike:

2. Nato kliknite Razvojni > Vstavi > Gumb za urejanje (nadzor ActiveX) da v delovni list vstavite ukazni gumb.

3. Z desno miškino tipko kliknite vstavljeni ukazni gumb in nato izberite Ogled kode iz kontekstnega menija. Prikaz slike:

4. V Ljubljani Microsoft Visual Basic za aplikacije okno, zamenjajte izvorno kodo s spodnjo kodo VBA.

VBA koda: združite besedila več celic v okvir besedila

Private Sub CommandButton1_Click()
    Dim xRg As Range
    Dim xCell As Range
    Dim xStr As String
    On Error Resume Next
    Set xRg = Application.Selection
    If xRg Is Nothing Then Exit Sub
    With Me.TextBox1
        .Text = vbNullString
        .MultiLine = True
        .WordWrap = True
        For Each xCell In xRg
            xStr = xCell.Value
            .Text = Me.TextBox1 & xStr & Chr(10)
        Next
    End With
End Sub

Opombe: CommandButton1 je ime vstavljenega ukaznega gumba. Prosimo, spremenite to glede na vaše potrebe.

5. Izklopite način oblikovanja tako, da kliknete Razvojni > Način oblikovanja.

6. Izberite celice, ki jih potrebujete za združevanje besedil v okvirček besedila in nato kliknite gumb Ukaz. In nato se vse vsebine izbranih celic združijo v polje z besedilom takoj, kot je prikazano spodaj.


Sorodni članki:


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    allan · 2 months ago
    hola Como el boton puede tomarme las celdas visibles, ya que a veces oculto celdas y me las toma igual pero no quiero
  • To post as a guest, your comment is unpublished.
    allan · 2 months ago
    Muy bueno, Y si le quiero poner ; para separar los textos ¿cómo lo hago?