根据工作表2 删除工作表1的行数

hyjianjian · 发表于 2015-8-30 23:40

hlly888 发表于 2015-8-30 23:25
0 = 9/8 1 = 9/8追加

9/8 是从天上掉下来的吗？？？？？？？？？？？？？？？？

sheel2说明

hyjianjian · 发表于 2015-8-30 23:45

hyjianjian 发表于 2015-8-30 23:40
sheel2说明

sheel1 H列清空结果再次运行会出现错误！

你可以在sheel2 C列改为1 sheel1 H列对应的日期就要出现“追加” 2个字 0则为去掉追加

hyjianjian · 发表于 2015-8-30 23:50

追不追加是根据 sheel2 C 列来决定的！ 0 是正常 1是追加不是说B列有2个日期就一定是追加！有2个日期者要写入 sheel1 H列 2个日期！　　格式为　　XXXX及XXXXX 或者为 X/XX~X/XX

hyjianjian · 发表于 2015-8-31 18:54

hlly888 发表于 2015-8-30 23:25
0 = 9/8 1 = 9/8追加

9/8 是从天上掉下来的吗？？？？？？？？？？？？？？？？

已经更新，sheet2说明附件。请关注

hlly888 · 发表于 2015-8-31 23:09

hyjianjian 发表于 2015-8-31 18:54
已经更新，sheet2说明附件。请关注

更改后求助23.zip (20.81 KB, 下载次数: 3)

hyjianjian · 发表于 2015-8-31 23:36

hlly888 发表于 2015-8-31 23:09

表达逻辑正确了！
      2个问题点：

      运行后  会对sheet1 A列数据有删除操作例如原来是-108 变成 108

      当出现3个日期时候 2个相同时    追加判断出错了！用黄色标注了！

hlly888 · 发表于 2015-9-1 13:42

hyjianjian 发表于 2015-8-31 23:36
表达逻辑正确了！
2个问题点：

能否用VBA实现在Sheet1 A列只保留Sheet2 A列匹配的数字！

-123 只保留匹配的数字 123
sssd126 只保留匹配的数字 126

原来是-108 必须变成 108 ！！！！！！！！！！！！！！！！！

hyjianjian · 发表于 2015-9-1 20:52

hlly888 发表于 2015-9-1 13:42
能否用VBA实现在Sheet1 A列只保留Sheet2 A列匹配的数字！

-123 只保留匹配的数字 123

抱歉，能否重新修改下VBA？

                  1：不要对Sheetl1 除了H列  进行任何修改。
                  2：根据Sheetl2  A 对应的写入 Sheetl1  A 匹配的编号    在Sheet1  H 列写入  Sheetl2 B 列的时间！（方法一样）
                  Sheetl2 A列  S160 的 B 列日期写入到 Sheetl1  A列  S160 的 H 列里

                  有符合的则写入无则跳过

               之前代码发个小BUG  当Sheetl2 A 列出现编号（S116）出现3个日期时候无法正确写入时间（追加日期放的不正确）

烦请修改  谢谢

hlly888 · 发表于 2015-9-1 21:25

hyjianjian 发表于 2015-9-1 20:52
抱歉，能否重新修改下VBA？

1：不要对Sheetl1 除了H列进行任何修改。

下边各如何处理？不要文字说明。要模拟结果。

S125 2015/8/28 1
S125 2015/8/29 1
S125 2015/8/30 1

S126 2015/8/28 0
S126 2015/8/28 0
S126 2015/8/29 0

S127 2015/8/28 0
S127 2015/8/28 1
S127 2015/8/28 0

hlly888 · 发表于 2015-9-1 21:32

hyjianjian 发表于 2015-9-1 20:52
抱歉，能否重新修改下VBA？

1：不要对Sheetl1 除了H列进行任何修改。

相同日期最多头几个？

S126       2015/8/28       0
S126       2015/8/28       0
S126       2015/8/28       0
S126       2015/8/28       0
S126       2015/8/28       0
S126       2015/8/28       0

		自动登录	找回密码
密码			免费注册

[求助] 根据工作表2 删除工作表1的行数

评分

评分

浏览过的版块

[求助] 根据工作表2 删除 工作表1的行数

评分

评分

浏览过的版块

[求助] 根据工作表2 删除工作表1的行数