A
A
andreystrelkov2014-02-09 18:40:58
excel
andreystrelkov, 2014-02-09 18:40:58

How to insert text in Excel so that all bottom rows move down?

I can’t figure out how to insert text so that there is such an effect
6bzw.png
and not like that
djon.png

Answer the question

In order to leave comments, you need to log in

7 answer(s)
Y
Yuri Lobanov, 2014-02-09
@iiil

What text from the example is inserted, what lines should be shifted?
I understand that the Whirltab column, etc. should offset anything that starts with Acer?
Where are you copying the text from, how many columns are there in total?

A
andreystrelkov, 2014-02-09
@andreystrelkov

The text is inserted from the notepad
Whirltab RS1001T
Sprint WM EL1004N
Sprint EU1001N
Adroit BN1302N
Sprint ES1001N
Adroit ON1403N
i.e. as if it should be inserted into the cut

Y
Yuri Lobanov, 2014-02-09
@iiil

I can only suggest using macros, and I still need to write it to make it work, which I'm not sure about
: macro.
The macro does the following: determines the number of lines in the text on the clipboard, inserts the same number of cells (there is such a tool) and then pastes the text.

T
toha-tiger, 2014-02-09
@toha-tiger

If this is a one-time operation, then you can do it as follows:
- insert the text "Whirltab ..." on a blank sheet in column C
- copy the entire rows from a new sheet
- paste it into cell A3

M
M1zantrop, 2014-02-09
@M1zantrop

1. Select the entire line above which you want to insert lines. (Shift +Space)
2. Click the "Insert" button on the "Home" toolbar.

In the same way, you can insert an empty line, delete.
Likewise with columns.
Excel 2007 and older, for 2003, I think the same.

T
toha-tiger, 2014-02-10
@toha-tiger

Hold a macro for your task

Sub InsertLines()
    FoundAddress = ActiveCell.Address
    FoundRow = Range(FoundAddress).Row
    
    Sheets.Add
    ActiveSheet.Name = "InsertTMP"
    
    Range("A1").Select
    ActiveSheet.Paste
    LinesCount = Selection.Rows.Count
    
    Application.DisplayAlerts = False
    Sheets("InsertTMP").Delete
    Application.DisplayAlerts = True
    
    Rows(FoundRow & ":" & FoundRow + LinesCount - 1).Select
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    
    Range(FoundAddress).Select
    ActiveSheet.Paste
End Sub

Sequence of actions:
- add a macro to the book, optionally assign a key combination to it
- copy the text to the clipboard
- select a cell on the sheet to paste
- run the macro by Alt + F8 or by the assigned combination

R
rosperitus, 2014-02-14
@rosperitus

Select right on this sheet from the desired line (in your case from line 4) the required number of lines (in your case 6 lines) and right-click on the selection - Add cells

Didn't find what you were looking for?

Ask your question

Ask a Question

731 491 924 answers to any question