一个单元格里的文字，如何让第二行首字缩进，如下图

sycn_cn

一个单元格里的文字内容相对较多，如何能让第二行的文字像第一行一样缩进2个字符位，加空格没有效果。第一个方格内容是在一个单元格里，后面的内容是在3个单元格里显示的。

webber04

楼主先用alt+enter换个行，然后再空格

sobili

把文字复制至word中，用如下代码运行试试：

1. Sub 段首加空格()
   
2. Dim doc As Document
   
3. 
   
4. Set doc = ActiveDocument
   
5. Selection.HomeKey unit:=wdStory
   
6. 
   
7. For i = 1 To doc.Paragraphs.Count
   
8.     Selection.Text = "    "
   
9.     Selection.Move unit:=wdParagraph, Count:=1
   
10. Next i
    
11. 
    
12. End Sub
    

复制代码

最后把文字复制回Excel中。

sycn_cn

webber04 发表于 2022-6-17 19:59
楼主先用alt+enter换个行，然后再空格

小技巧，解决大问题，谢谢

sycn_cn

sobili 发表于 2022-6-19 17:07
把文字复制至word中，用如下代码运行试试：

最后把文字复制回Excel中。

虽然我没试用你的方法， 但非常感谢你！谢谢！