Taula de continguts
Mentre treballem amb VBA a Excel, sovint hem de concatenar cadenes i variables en un full de treball. La concatenació de cadena(s) i variable(s) s'utilitza àmpliament en gairebé tots els sectors dels nostres treballs, des de resumir els resultats dels estudiants fins a analitzar un negoci complex. En aquest article, us mostraré com podeu concatenar cadenes i variables en un full de treball amb VBA a Excel. Explicaré les coses amb exemples i il·lustracions adequats.
Concatenar cadenes i variables a Excel VBA (vista ràpida)
Descarregueu el quadern de pràctiques
Descarregueu aquest quadern de pràctiques per fer exercici mentre llegiu aquest article.
Concatenar String i Variable.xlsm
Concatenar cadenes i variables a Excel VBA (anàlisi pas a pas)
Primer de tot, vegem com podem concatenar cadenes (s) i variable(s) a VBA pas a pas.
⧪ Cadena(s) de concatenació:
Per concatenar dues o més cadenes a VBA , podeu utilitzar tant el símbol aritmètic addició (+) com el símbol ampersand (& ).
Per exemple, per concatenar les cadenes “Grans expectatives” i “A Tale of Two Cities” amb coma , podeu utilitzar:
4065
O,
6088
Executeu qualsevol dels codis anteriors. Mostrarà la sortida concatenada, Grans expectatives,A Tale of Two Cities .
⧪ Variable de concatenació (s)
Si totes les variables contenen valors de cadena, aleshores podeu utilitzar tant el símbol aritmètic de l' addició (+) com el símbol ampersand (&) .
Però si no ho fan, podeu utilitzar només el símbol et (&) per concatenar.
Per exemple, tinguem dues variables, A i B .
A conté una cadena, “A Tale of Two Cities” , i B conté una altra cadena, “Les quaranta regles de l'amor” .
Podeu utilitzar tant el símbol addició (+) com el símbol ampersand (&) per concatenar-los.
2861
O,
3972
En tots dos casos, tornaran la cadena concatenada.
Però si A és una cadena ( “A Tale of Two Cities” ) i B és un nombre enter ( 27 ), heu d'utilitzar el símbol ampersand (&) per concatenar.
7958
Retornarà la sortida concatenada. .
Exemples a Concat introduïu cadenes i variables a Excel VBA (que inclou macro, UDF i UserForm)
Hem après a concatenar cadenes i variables amb VBA a Excel . Aquesta vegada explorarem alguns exemples que impliquen la concatenació de cadenes i variables amb VBA .
Exemple 1: desenvolupament d'una macro per concatenar cadenes i variable(s) a Excel VBA
Hem après a fer-hoconcatenar cadenes i variables amb VBA . Aquesta vegada desenvoluparem una Macro per concatenar cadenes i variables de diverses columnes en un full de treball.
Aquí tenim un conjunt de dades amb noms de llibres , autors i preus d'alguns llibres d'una llibreria anomenada Martin Bookstore.
Desenvolupem una Macro per concatenar les columnes 1, 2, i 3 del conjunt de dades B4:D14 a la cel·la F4 .
El codi VBA serà:
⧭ Codi VBA:
2036
⧭ Sortida :
Executeu aquest codi. Obtindreu les 3 columnes concatenades a l'interval F4:F14.
Llegir més: Macro a Concatenar diverses columnes a Excel (amb UDF i UserForm)
Exemple 2: creació d'una funció definida per l'usuari per concatenar cadenes i variables a Excel VBA
Hem après a desenvolupar una Macro per concatenar diverses columnes d'un conjunt de dades. Aquesta vegada crearem una funció definida per l'usuari per concatenar cadenes o variables a Excel.
El codi VBA complet serà:
⧭ Codi VBA:
1870
⧭ Sortida:
Seleccioneu la columna on voleu concatenar el rang i introduïu aquesta fórmula:
=ConcatenateValues("She","H. Rider Haggard",", ") Tornarà She, H. Rider Haggard com a sortida.
De nou, introduïu la fórmula:
=ConcatenateValues(B4:B14,30,", ") [ Fórmula de matriu . Així que no us oblideupremeu CTRL + MAJÚS + INTRO tret que estigueu a Office 365 .]
Concatenarà 30 amb tots els valors de l'interval B4:B14 .
Finalment, introduïu:
=ConcatenateValues(B4:B14,C4:C14,", ") [De nou Fórmula de matriu . Així que no us oblideu de prémer CTRL + MAJÚS + INTRO tret que estigueu a Office 365 .]
Concatenarà tots els valors de l'interval B4: B14 amb els de C4:C14 .
Llegir més: Com concatenar a Excel (3 maneres adequades)
Lectures similars:
- Com combinar text de dues o més cel·les en una cel·la a Excel (5 mètodes)
- Combina files en una cel·la a Excel
- Concatena números a Excel (4 fórmules ràpides)
- Combina text a Excel (8 maneres adequades)
- Com concatenar l'apòstrof a Excel (6 maneres fàcils)
Exemple 3: desenvolupament d'un Formulari d'usuari per concatenar cadenes i variables en un full de treball diferent a Excel VBA
Hem après a desenvolupar una Macro i una definida per l'usuari funció per concatenar cadenes i valors. Finalment, desenvoluparem un Formulari d'usuari per concatenar cadenes i valors a la ubicació desitjada del full de treball desitjat.
⧪ Pas 1: inserció del formulari d'usuari
Vés a Insereix > Opció UserForm a la barra d'eines VBA per inserir un nou UserForm .
⧪ Pas 2: arrossegament Eines pers'obrirà el UserForm
Un UserForm anomenat UserForm1 , juntament amb una Toolbox anomenada Control .
Moveu el ratolí sobre la caixa d'eines i arrossegueu 2 quadres de llista, 5 quadres de text, 7 etiquetes i 1 botons d'ordre al formulari d'usuari .
Canvieu les visualitzacions de les etiquetes. tal com es mostra a la figura.
De la mateixa manera, canvieu la visualització del CommandButton a D'acord .
⧪ Pas 3: escriptura del codi per a TextBox1
Feu doble clic a TextBox1 . S'obrirà un Subprocediment privat anomenat TextBox1_Change . Introduïu el codi següent allà.
5836
⧪ Pas 4: escriviu el codi per a TextBox3
De la mateixa manera, feu doble clic a Quadre de text3 . S'obrirà un altre subprocediment privat anomenat TextBox3_Change . Introduïu el codi següent allà.
9495
⧪ Pas 5: escriviu el codi per a TextBox4
A més, feu doble clic a Quadre de text3 . S'obrirà un altre subprocediment privat anomenat TextBox3_Change . Introduïu el codi següent allà.
1240
⧪ Pas 6: Escriure el codi per a ListBox2
A continuació, feu doble clic a ListBox2 . Quan s'obri el Subprocediment privat anomenat ListBox2_Click , introduïu-hi aquest codi.
7503
⧪ Pas 7: Escriure el codi per a CommanButton1
A més, feu doble clic a CommandButton1 . Després del Subprocediment privat anomenat CommandButton1_Change s'obre, inseriu-hi el codi següent.
6104
⧪ Pas 7: escriviu el codi per executar el formulari d'usuari
Ara és el pas final. Inseriu un mòdul nou des de la barra d'eines VBA i inseriu el codi següent.
8982
⧪ Pas 8: execució el UserForm
El vostre UserForm ja està llest per utilitzar-lo. Per executar-lo, seleccioneu el conjunt de dades del full de treball (incloent els Encapçalaments ) i executeu la Macro anomenada Run_UserForm .
El Formulari d'usuari es carregarà amb totes les opcions. L'adreça de l'interval seleccionada es mostrarà a TextBox1 ( B3:D4 aquí). Si vols, pots canviar-ho. L'interval seleccionat al full de treball canviarà.
Seleccioneu les columnes que voleu concat del quadre de llista Columnes a Concat . Aquí he seleccionat Nom del llibre i Preu .
Introduïu el Separador . Aquí he introduït una coma ( , ).
Seleccioneu el nom del full de treball on voleu posar l'interval concatenat a Concatenat a quadre de llista. Aquí he introduït Full3 .
(En el moment que seleccioneu el full, s'activarà, encara que no sigui l'actiu.)
A continuació, inseriu-lo la Ubicació de sortida . És la referència de cel·la de la primera cel·la de l'interval concatenat. Aquí he posat B3 .
(En el moment en què entreu a Ubicació de sortida , es seleccionarà l'interval de sortida).
I finalment , introduïu elnom de la Capçalera de sortida (Capçalera de l'interval de sortida). Aquí he posat Rang concatenat .
(En el moment que poseu la Capçalera de sortida , s'establirà la capçalera de la columna de sortida.)
Feu clic a D'acord . Obtindreu la sortida desitjada a la ubicació desitjada.
Llegiu més: Com concatenar cadenes i nombres enters mitjançant VBA
Conclusió
Per tant, aquests són alguns exemples en què podeu utilitzar Excel VBA per concatenar cadenes i variables. Espero que els exemples t'hagin deixat tot bastant clar. Té vostè alguna pregunta? No dubteu a preguntar-nos. I no us oblideu de visitar el nostre lloc ExcelWIKI per obtenir més publicacions i actualitzacions.
