Conas sraitheanna a athdhéanamh líon sonraithe uaireanta bunaithe ar cholún eile in Excel?
An ndearna tú iarracht riamh as a chéile a athdhéanamh bunaithe ar luach colúin eile mar atá thíos an pictiúr a thaispeántar? San Airteagal seo, tabharfaidh mé isteach an modh chun an post seo a réiteach in Excel.
Déan sraitheanna arís bunaithe ar luach colúin eile le VBA
Déan sraitheanna arís bunaithe ar luach colún eile ag Kutools le haghaidh Excel
Déan sraitheanna arís le ham socraithe ag Kutools le haghaidh Excel
Déan sraitheanna arís bunaithe ar luach colúin eile le VBA
Tá cód agam anseo ar féidir leis na sraitheanna a athdhéanamh go tapa bunaithe ar luachanna deiridh an cholúin.
1. Brúigh Alt + F11 eochracha le cumasú Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. cliceáil Ionsáigh > Modúil, ansin cóipeáil thíos an cód agus greamaigh é chuig an nua Modúil script.
VBA: Déan sraitheanna arís bunaithe ar luach colúin eile
Sub CopyRow()
'UpdatebyExtendoffice20181011
Dim xRg As Range
Dim xCRg As Range
Dim xFNum As Integer
Dim xRN As Integer
On Error Resume Next
SelectRange:
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Select the number value", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Columns.Count > 1 Then
MsgBox "Please select single column!"
GoTo SelectRange
End If
Application.ScreenUpdating = False
For xFNum = xRg.Count To 1 Step -1
Set xCRg = xRg.Item(xFNum)
xRN = CInt(xCRg.Value)
With Rows(xCRg.Row)
.Copy
.Resize(xRN).Insert
End With
Next
Application.ScreenUpdating = True
End Sub
3. Brúigh F5 eochair, tagann dialóg amach, roghnaigh an liosta uimhreacha a ndéanfar na sraitheanna arís agus arís eile bunaithe orthu.
4. Cliceáil OK, rinneadh na sraitheanna arís agus arís eile bunaithe ar an luach colún roghnaithe.
Déan sraitheanna arís bunaithe ar luach colún eile ag Kutools le haghaidh Excel
Mura bhfuil tú go maith ag baint úsáide as VBA, is féidir leat triail Kutools le haghaidh Excel'S Rónna/Colúin Dhúblacha Bunaithe ar Luach Cille gné, a bhfuil gá ach dhá chéim.
Kutools le haghaidh Excel, le níos mó ná 300 feidhmeanna úsáideacha, déanann sé do phoist níos éasca. |
1. cliceáil Kutools > Ionsáigh > Rónna/Colúin Dhúblacha Bunaithe ar Luach Cille.
2. Sa dialóg popping, roghnaigh Cóipeáil agus cuir isteach sraitheanna rogha sa cineál rannán, ansin roghnaigh an raon ar mhaith leat a dhéanamh arís Ionsáigh Range textbox, agus roghnaigh an colún a shocraíonn na hamanna athuair leis an Déan arís Bosca téacs. Cliceáil Ok.
Ansin déanfar na sraitheanna a athdhéanamh ag an gcolún roghnaithe.
Déan sraitheanna arís le ham socraithe ag Kutools le haghaidh Excel
Más mian leat sraitheanna a athdhéanamh le ham socraithe gan sraitheanna a chur isteach ceann ar cheann, is féidir leat iarracht a dhéanamh an Cuir Sraitheanna & Colúin Bhána isteach agus Líon Cealla Bán fóntais de Kutools le haghaidh Excel chun an post seo a láimhseáil go tapa.
Tar éis a shuiteáil Kutools for Excel, déan mar atá thíos le do thoil:Download Kutools Íoslódáil saor in aisce do Excel Anois!)
1. Roghnaigh an raon sonraí a theastaíonn uait sraitheanna a athdhéanamh, cliceáil Kutools > Ionsáigh > Cuir Sraitheanna & Colúin Bhána isteach. Ansin sa Cuir Sraitheanna & Colúin Bhána isteach dialóg, seiceáil Sraitheanna folmha rogha, ansin cineál 1 i Eatramh of bosca téacs, agus clóscríobh an uimhir ar mhaith leat sraitheanna a athdhéanamh ann Rónna Bosca téacs.
2. cliceáil Ok, tá na sraitheanna bán curtha isteach faoi gach ró.
3. Coinnigh an raon roghnaithe, cliceáil Kutools > Ionsáigh > Líon Cealla Bán. Sa an Líon Cealla Bán dialóg, seiceáil Bunaithe ar luachanna agus An Dúin roghanna.
4. cliceáil Ok. Anois tá na cealla bána líonta leis an luach thuas.
Uirlisí Táirgiúlachta Oifige is Fearr
Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am. Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...
Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca
- 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á!