| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 4530 人关注过本帖
标题:EXCEL中如何求得单元格所在列的标题字母
只看楼主 加入收藏
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9781
专家分:26837
注 册:2012-2-5
收藏
得分:0 
以下是引用wengjl在2020-11-23 09:24:05的发言:

  发这个帖子最后实现的目标如下,是为了动态复制有数据的区域(win7.0+vfp8.0+office2007通过)

    ……
    Mx_UsedRange =Mx_excel.worksheets(Mx_SheetName).UsedRange
    Mx_rows=Mx_UsedRange.rows.count  
    Mx_cols=Mx_UsedRange.columns.count  
    IF Mx_cols<=26
        dygz=CHR(Mx_cols+64)+ALLTRIM(STR(Mx_rows))  
    ELSE
      IF MOD(Mx_cols,26)=0  
          dygz=CHR(64+INT(Mx_cols/26)-1)+CHR(64+MOD(Mx_cols,26)+26)+ALLTRIM(STR(Mx_rows))
      ELSE
         dygz=CHR(64+INT(Mx_cols/26))+CHR(64+MOD(Mx_cols,26))+ALLTRIM(STR(Mx_rows))
      ENDIF
    ENDIF
    Mx_excel.ActiveSheet.Range("A2:"+dygz).Copy
    ……

EXCEL中相获取指定区域的代码:
多个单元格:cells(左上角行,左上角列).Resize(行数,列数)

坚守VFP最后的阵地
2021-03-20 21:59
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2195
专家分:3828
注 册:2007-4-27
收藏
得分:0 
谢谢!又学一招

只求每天有一丁点儿的进步就可以了
2021-03-22 15:18
快速回复:EXCEL中如何求得单元格所在列的标题字母
数据加载中...
 
   



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

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