| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3626 人关注过本帖
标题:请教,如何将一个单元格的内容分成多个单元格,并在同一列显示
只看楼主 加入收藏
zhr822
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2016-9-9
结帖率:75%
收藏
已结贴  问题点数:20 回复次数:5 
请教,如何将一个单元格的内容分成多个单元格,并在同一列显示
请教各位前辈,我希望把一个单元格的数据纵向排列,每个数据占一个单元格,如何实现?
如下图,也就是把图1变成图2。
图1:
图片附件: 游客没有浏览图片的权限,请 登录注册


图2:
图片附件: 游客没有浏览图片的权限,请 登录注册

搜索更多相关主题的帖子: 单元格 显示 多个 一列 内容 
2020-11-06 18:34
BaoZhongke
Rank: 2
等 级:论坛游民
帖 子:8
专家分:20
注 册:2020-11-8
收藏
得分:20 
先使用“数据”页面的分列,固定列宽的方式将单元格的内容分成一行;然后复制;另起一行粘贴
粘贴时,选中一个单元格,单击鼠标右键选择“选择性粘贴”,在选择性粘贴对话框中选择“转置”;

先谋生,后谋爱.
2020-11-08 03:01
zhr822
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2016-9-9
收藏
得分:0 
回复 2楼 BaoZhongke
谢谢你的解答,使用“数据”页面的分列,固定列宽的方式将单元格的内容分成一行,设置字段宽度的时候是需要一个一个把标尺移动到数据间隔处,我如果有100个字符数据,每个之间都需要手动分割,能不能有简便的方法呢?
2020-11-11 12:29
sdta
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9848
专家分:27241
注 册:2012-2-5
收藏
得分:0 
学习VFP吧,数据处理是VFP的强项,速度天下第二

坚守VFP最后的阵地
2021-04-13 23:40
sdta
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9848
专家分:27241
注 册:2012-2-5
收藏
得分:0 
变通一下吧
图片附件: 游客没有浏览图片的权限,请 登录注册


[此贴子已经被作者于2021-4-17 12:41编辑过]


坚守VFP最后的阵地
2021-04-17 12:38
山泉水
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:3
帖 子:4
专家分:0
注 册:2023-5-31
收藏
得分:0 
Option Explicit

Sub trnsp()

    Dim s() As String
   
    Dim n&
   
    n = Len(Cells(1, 1))
   
    ReDim s(0 To 0, 0 To n - 1)
   
    Dim i&
   
    For i = 1 To n Step 1
   
        If i <> 1 And i <> n Then
   
            s(0, i - 1) = Mid(Cells(1, 1), i, 1)
        
        ElseIf i = 1 Then
        
            s(0, i - 1) = Left(Cells(1, 1), 1)
            
        ElseIf i = n Then
        
            s(0, i - 1) = Right(Cells(1, 1), 1)
        
        End If
        
    Next i

    Dim r As Range
   
    Set r = Range(Cells(2, 2), Cells(n + 1, 2))
   
    r.Value = Application.Transpose(s)
   
End Sub
2023-05-31 12:50
快速回复:请教,如何将一个单元格的内容分成多个单元格,并在同一列显示
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.030423 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved