Note: The other languages of the website are Google-translated. Back to English

Conas as a chéile bán a chur isteach i ndiaidh téacs ar leith in Excel?

Más mian leat sraitheanna bána a chur isteach i ndiaidh téacs ar leith mar a leanas an pictiúr a thaispeántar, conas déileáil leis go tapa agus go héasca gan iad a chur isteach de láimh ceann ar cheann?

Cuir isteach sraitheanna bána i ndiaidh téacs ar leith le cód VBA


Cuir isteach sraitheanna bána i ndiaidh téacs ar leith le cód VBA

Féadfaidh tú an cód VBA thíos a chur i bhfeidhm chun sraitheanna bána a chur isteach i ndiaidh an téacs shonraigh atá uait, déan mar seo é le do thoil:

1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas i bhFuinneog an Mhodúil.

Cód VBA: Cuir isteach sraitheanna bána i ndiaidh an téacs shonraigh

Sub Insertrowbelow()
'updateby Extendoffice
    Dim i As Long
    Dim xLast As Long
    Dim xRng As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = Application.ActiveWindow.RangeSelection.Address
    Set xRng = Application.InputBox("please select the column with specific text:", "Kutools for Excel", xTxt, , , , , 8)
    If xRng Is Nothing Then Exit Sub
    If (xRng.Columns.Count > 1) Then
        MsgBox "the selected range must be one column", , "Kutools for Excel"
        Exit Sub
    End If
    xLast = xRng.Rows.Count
    For i = xLast To 1 Step -1
      If InStr(1, xRng.Cells(i, 1).Value, "In progressing") > 0 Then
        Rows(xRng.Cells(i + 1, 1).Row).INSERT shift:=xlDown
      End If
    Next
End Sub

nótaí: Sa chód thuas, is féidir leat luach an téacs a athrú “Ag dul chun cinn”Maidir le haon luachanna eile a theastaigh uait ón script Má tá InStr (1, xRng.Cells (i, 1) .Value, "Ar siúl")> 0 Ansin.

3. Ansin, brúigh F5 eochair chun an cód seo a rith, sa bhosca dialóige popped out, roghnaigh sonraí an cholúin tá an téacs sonrach a theastaíonn uait a úsáid, féach an scáileán:

4. Agus ansin, cliceáil OK cnaipe, agus na sraitheanna bán curtha isteach tar éis an téacs áirithe a shonraigh tú, féach an scáileán:


Ailt sraitheanna níos coibhneasta a chur isteach:

  • Cóipeáil agus Cuir Isteach Il-Amanna nó Dúblaigh The Row X Times
  • I do chuid oibre laethúla, an ndearna tú iarracht riamh as a chéile nó as a chéile a chóipeáil agus ansin cúpla uair a chur isteach faoin tsraith sonraí reatha i mbileog oibre? Mar shampla, tá raon cealla agam, anois, ba mhaith liom gach ró a chóipeáil agus iad a ghreamú 3 huaire go dtí an chéad tsraith eile mar a thaispeántar an pictiúr a leanas. Conas a d’fhéadfá déileáil leis an bpost seo in Excel?
  • Cuir Sraitheanna Bána isteach nuair a athraíonn luach in Excel
  • Má cheaptar go bhfuil raon sonraí agat, agus anois ba mhaith leat sraitheanna bána a chur isteach idir na sonraí nuair a athraíonn luach, ionas gur féidir leat na luachanna seicheamhacha céanna a scaradh i gcolún amháin agus na scáileáin scáileáin a leanas a thaispeántar. San Airteagal seo, labhróidh mé faoi roinnt cleasanna chun an fhadhb seo a réiteach.
  • Cuir isteach Blank Row Os cionn Téacs Sonrach In Excel
  • Nuair a bhíonn tú ag obair ar bhileog oibre, an ndearna tú iarracht riamh sraith bán a chur isteach os cionn téacs ar leith i gcolún? Mar shampla, tá roinnt ainmneacha i gcolún A, anois, ba mhaith liom sraitheanna bána a chur isteach os cionn na gcealla ina bhfuil an t-ainm “Mike” mar an scáileán ar chlé a thaispeántar, b’fhéidir, níl aon bhealach díreach ann chun an tasc seo a réiteach in Excel . An t-alt seo, labhróidh mé faoi roinnt cleasanna maithe chun déileáil leis an bpost seo in Excel.

  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin agus Sonraí a Choinneáil; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna Dúblacha agus Suim / Meán... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Foirmlí is Fearr agus Cuir isteach go tapa, Ranganna, Cairteacha agus Pictiúir; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Grúpáil Tábla Pivot de réir uimhir na seachtaine, lá na seachtaine agus níos mó ... Taispeáin Cealla Díghlasáilte, Faoi Ghlas de réir dathanna éagsúla; Aibhsigh Cealla a bhfuil Foirmle / Ainm orthu...
cluaisín kte 201905
  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
bun officetab
Sórtáil tuairimí de réir
Comments (2)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá sé seo chomh cabhrach! Ach conas a chuirim sraitheanna nua leis tar éis roinnt téacsanna éagsúla. Mar shampla, ba mhaith liom sraith a chur leis tar éis SB2 agus BB2, an bhfuil sé seo indéanta? nó an gá dom é a rith faoi dhó le dhá théacs éagsúla?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Is féidir leat an fheidhm textjoin a úsáid ach an focal céanna a chur leis ag deireadh gach líne agus ansin scrios an focal sin le ctrl+f
Níl aon tráchtanna curtha suas anseo go fóill
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta

Lean orainn

Cóipcheart © 2009 - www.extendoffice.com. | Gach ceart ar cosaint. Cumhachtaithe ag ExtendOffice. | léarscáil an tSuímh
Is trádmharcanna nó trádmharcanna cláraithe de chuid Microsoft Corporation sna Stáit Aontaithe agus / nó i dtíortha eile iad lógó Office agus Office.
Cosanta ag Sectigo SSL