乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 207|回复: 13

EXcel宏

[复制链接]

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2013-2-22 13:09:18 | 显示全部楼层 |阅读模式
我不知道'如果这是一个适合这个论坛的帖子
如果是这样,我需要将2013年excel电子表格中的多个单元格(所有字符串)导出为以真实ASCII文本表示的预定义文件名,如果存在,则覆盖整个文件
谁能帮我往正确的方向推一下吗&nbsp
谢谢&nbsp-David,即细胞ct3至ct29和dt3至dt26 至 c: /acad/proj。dat公司
回复

使用道具 举报

154

主题

1274

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1936
发表于 2013-2-22 13:27:30 | 显示全部楼层
最简单的方法是将单元格链接到另一个工作表,然后创建一个宏(可以使用宏记录器),将链接的单元格导出到项目中。dat文件http://smallbusiness.chron.com/multiple-cells-excel-another-worksheet-35868.html
回复

使用道具 举报

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2013-2-22 13:34:40 | 显示全部楼层
谢谢本人'我正在调查 本人'我使用非常旧的MS电子表格将公式添加到;本人'我在这里试试学习曲线 这似乎是值得的 本人'我可能会问更多的新手问题 谢谢;再一次&nbsp_大卫
回复

使用道具 举报

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2013-2-22 13:39:45 | 显示全部楼层
输出格式是什么?如果逗号分隔可以,只需将其保存为CSV文件…
将数据保存到文件相对简单,但您必须知道所需的格式。.simple ascii isn'不够具体…你需要每行一项内容还是一行全部内容。您是否在数据之间使用空格
数字5需要更多输入
回复

使用道具 举报

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2013-2-22 13:49:03 | 显示全部楼层
好的,我链接了一个新的工作表,数据就在那里
输出文件:每个单元格1行数据中可能有空格,但读取数据的程序可以补偿没有空行的数据,即ie类型1:电气类型2:右
回复

使用道具 举报

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2013-2-22 13:56:34 | 显示全部楼层
现在我有了sheet4,单元格a1:a50,现在我必须找到宏重新排序 你'我认为那将是一个突出的按钮一个缎带;(我讨厌缎带)
回复

使用道具 举报

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2013-2-22 14:22:31 | 显示全部楼层
您必须右键单击ribbon并选择“自定义” 然后切换“开发人员”选项卡。
回复

使用道具 举报

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2013-2-22 14:42:04 | 显示全部楼层
找到了
了解它的工作原理 我宁愿写代码也不愿用录音机 但那#039;还有很长的路要走
回复

使用道具 举报

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2013-2-22 15:03:01 | 显示全部楼层
录音机会让你开始的 
回复

使用道具 举报

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2013-2-22 15:10:08 | 显示全部楼层
到目前为止很好
  1. Sub Macro5()
  2. '
  3. ' Macro5 Macro
  4. '
  5. ' Keyboard Shortcut: Ctrl+k
  6. '
  7.     Sheets("Sheet4").Select
  8.     Application.Goto Reference:="R1C1"
  9.     Range("A1:A50").Select
  10.     ActiveWorkbook.SaveAs Filename:="C:\acad\proj.txt", FileFormat:= _
  11.         xlTextMSDOS, CreateBackup:=False
  12.     Sheets("Sheet1").Select
  13. End Sub

如何防止出现过写对话框
谢谢&nbsp-大卫
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-6-29 18:04 , Processed in 1.824619 second(s), 83 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表