Dacă doriți să adăugați în serie un prefix specific la mai multe celule, puteți consulta acest articol. Aici vă vom prezenta 3 metode simple. Fiecare are propriile sale avantaje și dezavantaje. Puteți alege unul după nevoile dvs.
Uneori, poate fi necesar să adăugați un anumit text la începutul mai multor celule dintr-o foaie de lucru Excel. Pentru acei începători în Excel, ei pot avea tendința de a adăuga prefixul la fiecare celulă unul câte unul. Cu toate acestea, va fi extrem de consumator de timp dacă există un număr mare de celule care trebuie procesate. Prin urmare, este mai bine să utilizați oricare dintre următoarele 3 mijloace.
Metoda 1: Folosiți formula „&”.
- Pentru a start cu, selectați o celulă goală într-o altă coloană, cum ar fi Celula C1.
- Apoi, în celula selectată, tastați formula în modelul de = „Prefix” și Celulă, cum ar fi următorul exemplu.
= "DataNumen " & A1
- În cele din urmă, copiați formula în jos pentru a adăuga prefixul la celulele dorite.
Metoda 2: Utilizați funcția „CONCATENATE”.
- În primul rând, selectați o celulă goală într-o altă coloană, cum ar fi Celula C1.
- Apoi, introduceți funcția în model of = CONCATENATE(„Prefix”, Celulă) în Celula C1, cum ar fi următoarea.
= CONCATENATE("DataNumen ", A1)
- În cele din urmă, trageți celula curentă în jos până la ultimul interval în care trebuie să adăugați prefixul.
Metoda 3: Utilizați codul Excel VBA
- În primul rând, selectați celulele la care doriți să adăugați prefix.
- Apoi, declanșați editorul Excel VBA conform „Cum să rulați codul VBA în Excel".
- Apoi, copiați următorul cod într-un proiect sau modul neutilizat.
Sub AddPrefixToAllSelectedCells() Dim objSelectedRange As Excel.Range Dim strPrefix As String Dim objRange As Excel.Range Set objSelectedRange = Excel.Application.Selection strPrefix = InputBox("Introduceți prefixul specific de adăugat:", , "DataNumen ") Dacă strPrefix <> "" Atunci pentru fiecare objRange în objSelectedRange objRange.Value = strPrefix & objRange.Value Next End If End Sub
- Mai târziu, apăsați „F5” pentru a rula această macrocomandă chiar acum.
- Ulterior, în fereastra de dialog mică, introduceți prefixul specific și faceți clic pe „OK”.
- Imediat, după terminarea macrocomenzii, puteți reveni la foaia de lucru Excel pentru a afla că prefixul a fost adăugat cu succes în celulele selectate.
Comparaţie
Avantaje | Dezavantaje | |
Metoda 1 | Ușor de operat | 1. Nu pot procesa celule dintr-o singură coloană deodată |
Metoda 2 | 2. Nu se poate adăuga direct prefix la celulele originale | |
Metoda 3 | 1. Poate adăuga direct prefix la celulele originale | Începătorii VBA pot fi confuzi |
2. Poate procesa în lot celulele în coloane diferite |
Reparație Excel după accident
Excel este desigur instabil și tinde să se blocheze din când în când. Astfel, în acest fel, fișierul Excel poate fi, de asemenea, corupt cu ușurință. Prin urmare, dacă nu doriți să vă confruntați cu pierderea de date Excel, trebuie să faceți o copie de rezervă a fișierelor în mod regulat. În plus, este, de asemenea, o chestiune de necesitate să existe un instrument robust în apropiere, cum ar fi DataNumen Excel Repair la repara Excel fișier.
Introducerea autorului:
Shirley Zhang este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv SQL Server stabili și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com
1
Vă mulțumim pentru partajarea acestui cod în VBA.
Vă sugerez, ca în Excel, nu trebuie să faceți referire la Excel, așa că codul ar putea fi redus astfel încât să citiți după cum urmează. De asemenea, codul InputBox a fost modificat pentru a adăuga titlu.
Sub AddPrefixToAllSelectedCells2()
Dim objSelectedRange As Range, objRange As Range
Dim strPrefix ca șir
Set objSelectedRange = Selecție
strPrefix = InputBox(„Introduceți prefixul specific de adăugat:”, „Adăugați un prefix la celulele selectate”, „Tastați prefixul aici...”)
Dacă strPrefix „” Atunci
Pentru fiecare objRange din objSelectedRange
objRange.Value = strPrefix & objRange.Value
Pagina Următoare →
Final, dacă
End Sub
Dacă adăugarea de prefixe este obișnuită în mai multe fișiere, sugerați ca codul să fie adăugat la modulul propriu numit în Personal.xlsb și, în plus, legat de pictograma din Bara de instrumente Acces rapid. Dacă este adăugată la QAT, plasați pictograma asociată ca una dintre primele nouă pictograme și apoi puteți utiliza, de exemplu, Alt + 1 sau Alt + 2 etc. pentru a rula aceasta sau faceți clic pe pictograma însăși.
Sper că veți găsi cele de mai sus de interes și asistență.
Mike H
Trainer consultant MS Excel