Redian新闻
>
重新说明昨晚求助excel的问题,斑竹千万先别删,多谢了!
avatar
重新说明昨晚求助excel的问题,斑竹千万先别删,多谢了!# Joke - 肚皮舞运动
u*p
1
先报包裹:老年, 贝斯16萬5仟 + 死逃课19仟,单位股。
个人很看好新ceo的执行能力,现在加入twitter就好比13年加入fb。各位对twitter和
这个包裹咋看?包裹还有上升空间不?
avatar
q*n
2
昨晚发出去之后没想到大家这么热心,真心谢谢大家的帮助,尤其是蝗虫!
看样子还是我没有说清楚,数据太大了,传不上去。我做个简单的例子你们看看。
Sheet1
------------------------
A1 B1 C1
A2 B2 C2
A3 B3 C3
------------------------
在A2处输入温度值(30),在C2处输入测试值(496),其他的数值不用管。这样
Sheet1就变成
Sheet1
------------------------
A1 B1 C1
30 B2 496
A3 B3 C3
------------------------
Sheet2是这样子的:
-------------------------
Sheet2
------------------------
30 B1 C1
31 B2 C2
32 B3 C3
------------------------
其中第一列就是预设的温度场值,C列是空闲的
问题就是:如何使Sheet1中在C2处输入的那个496自动地找到Sheet2中的C1位置,并保
证在Sheet1中输入下一组的数据时,该值还是存在Sheet2中C1这个位置上?
(1),使用vlookup可以保证第一步,找到位置是没有问题的,但是输入下一组数据时
,Sheet2 中C1处的值就不见了。
(2),确定Sheet2中C1的位置,因为该位置中的温度值是30,这个和Sheet1中在A2处
输入的温度一致。
不知道这次我说明白了没有?在线等大家帮忙,没想到大家这么热心,真心感谢大家!
avatar
l*4
3
还整啥一万九千股,直接要两万股。
我觉得可以。应该没有再跌的空间了吧。
湾区还是西雅图?

【在 u*p 的大作中提到】
: 先报包裹:老年, 贝斯16萬5仟 + 死逃课19仟,单位股。
: 个人很看好新ceo的执行能力,现在加入twitter就好比13年加入fb。各位对twitter和
: 这个包裹咋看?包裹还有上升空间不?

avatar
n*4
4
这个网搜五分钟绝对有解,你费这么大劲贴这,找乐子的爷们娘们谁仔细看啊。

【在 q*******n 的大作中提到】
: 昨晚发出去之后没想到大家这么热心,真心谢谢大家的帮助,尤其是蝗虫!
: 看样子还是我没有说清楚,数据太大了,传不上去。我做个简单的例子你们看看。
: Sheet1
: ------------------------
: A1 B1 C1
: A2 B2 C2
: A3 B3 C3
: ------------------------
: 在A2处输入温度值(30),在C2处输入测试值(496),其他的数值不用管。这样
: Sheet1就变成

avatar
l*n
5
很不错
没bonus target?

【在 u*p 的大作中提到】
: 先报包裹:老年, 贝斯16萬5仟 + 死逃课19仟,单位股。
: 个人很看好新ceo的执行能力,现在加入twitter就好比13年加入fb。各位对twitter和
: 这个包裹咋看?包裹还有上升空间不?

avatar
d*f
6
你还是奔一个把,保证有解
--------胡汉三

【在 q*******n 的大作中提到】
: 昨晚发出去之后没想到大家这么热心,真心谢谢大家的帮助,尤其是蝗虫!
: 看样子还是我没有说清楚,数据太大了,传不上去。我做个简单的例子你们看看。
: Sheet1
: ------------------------
: A1 B1 C1
: A2 B2 C2
: A3 B3 C3
: ------------------------
: 在A2处输入温度值(30),在C2处输入测试值(496),其他的数值不用管。这样
: Sheet1就变成

avatar
y*3
7
办公地点是在旧金山还是在南湾?

【在 u*p 的大作中提到】
: 先报包裹:老年, 贝斯16萬5仟 + 死逃课19仟,单位股。
: 个人很看好新ceo的执行能力,现在加入twitter就好比13年加入fb。各位对twitter和
: 这个包裹咋看?包裹还有上升空间不?

avatar
x*o
8
对excel不熟,弄个redundant column D保存last C?
avatar
l*n
9
南湾twitter有office吗

【在 y****3 的大作中提到】
: 办公地点是在旧金山还是在南湾?
avatar
K*2
10
不如发贴吧

【在 q*******n 的大作中提到】
: 昨晚发出去之后没想到大家这么热心,真心谢谢大家的帮助,尤其是蝗虫!
: 看样子还是我没有说清楚,数据太大了,传不上去。我做个简单的例子你们看看。
: Sheet1
: ------------------------
: A1 B1 C1
: A2 B2 C2
: A3 B3 C3
: ------------------------
: 在A2处输入温度值(30),在C2处输入测试值(496),其他的数值不用管。这样
: Sheet1就变成

avatar
u*p
11
他家没有bonus

【在 l******n 的大作中提到】
: 很不错
: 没bonus target?

avatar
s*l
12
当然不见了,你在sheet1重新换一组数据时,sheet2将对应sheet11里的新数据,他们
之间是动态关系,找不到的话当然是空的了。小坡的思路我认为是对的。

【在 q*******n 的大作中提到】
: 昨晚发出去之后没想到大家这么热心,真心谢谢大家的帮助,尤其是蝗虫!
: 看样子还是我没有说清楚,数据太大了,传不上去。我做个简单的例子你们看看。
: Sheet1
: ------------------------
: A1 B1 C1
: A2 B2 C2
: A3 B3 C3
: ------------------------
: 在A2处输入温度值(30),在C2处输入测试值(496),其他的数值不用管。这样
: Sheet1就变成

avatar
w*z
13
你几年经验?

【在 u*p 的大作中提到】
: 他家没有bonus
avatar
w*e
14
唉。哥见你这么无助,就帮你一把。也算不上最好的办法,但是行得通,而且便于你理
解。
在你进行下面的操作之前,先把你的文件备份。要是以下操作失误,数据丢了,不要怪
我。
第一步:进入EXCEL的FILES->OPTIONS->Customize Ribbon. 在右边的main tabs里勾
上Developer.点OK完事。
第二步:点DEVELOPER菜单->Record Macro.在Shortcut Key里填个快捷键,比如q.点OK
完事。
第三步:点DEVELOPER菜单->Stop Recording Macro.
第四步:按alt+f11.把以下代码拷贝到 ' Keyboard Shortcut: Ctrl+q那一行下面。不
要把End sub 给弄没了。完了关掉代码窗口,代码会自动保存。
第五步:回到Sheet1.将光标定位到第一行。按下你刚才设定好的快捷键,比如ctrl+q.
这个宏按一次快捷键只帮你转一条数据过去。
看看代码里的注释。自己触类旁通吧。
CurrentRow = ActiveCell.Row
ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow, 1).Select

' Suppose the key in in column A. Change 1 to 2 if it is in column B, 3
if C...
Key = ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow, 1)

' Suppose the variable to be pasted in sheet2 is in column C. Change 3
to 4 if it is in column D,...
VarToTransfer = ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow, 3)

' Search the first 100000 records in sheet 2. If you have more records
than this, change this number.
For i = 1 To 100000
' Suppose the key is stored in column A in sheet 2. Change 1 to 2 if
it is in column B, ...
If ActiveWorkbook.Sheets("Sheet2").Cells(i, 1) = Key Then

' If it matches the current key, paste the variable in column c.
ActiveWorkbook.Sheets("Sheet2").Cells(i, 3) = VarToTransfer
' Move to the next row in sheet 1.
ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow + 1, 1).Select

' In column j of sheet 1, show the progress.
' WARNING: column j will be overwritten. Change 10 to other
numbers if there are data in column j.
' Delete column j before each batch of operations.
ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow, 10) = "Done"
Exit For
End If
Next
avatar
j*3
15
急求面经
avatar
z*i
16
版主开博彩吧。看最后谁帮到了楼主。。

唉。哥见你这么无助,就帮你一把。也算不上最好的办法,但是行得通,而且便于你理
解。
在你进行下面的操作之前,先把你的文件备份。要是以下操作失误,数据丢了,不要怪
我。
第一步:进入EXCEL的FILES->OPTIONS->Customize Ribbon. 在右边的main tabs里勾
上Developer.点OK完事。
第二步:点DEVELOPER菜单->Record Macro.在Shortcut Key里填个快捷键,比如q.点OK
完事。
第三步:点DEVELOPER菜单->Stop Recording Macro.
第四步:按alt+f11.把以下代码拷贝到 ' Keyboard Shortcut: Ctrl+q那一行下面。不
要把End sub 给弄没了。完了关掉代码窗口,代码会自动保存。
第五步:回到Sheet1.将光标定位到第一行。按下你刚才设定好的快捷键,比如ctrl+q.
这个宏按一次快捷键只帮你转一条数据过去。
看看代码里的注释。自己触类旁通吧。
CurrentRow = ActiveCell.Row
ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow, 1).Select

' Suppose the key in in column A. Change 1 to 2 if it is in column B, 3
if C...
Key = ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow, 1)

' Suppose the variable to be pasted in sheet2 is in column C. Change 3
to 4 if it is in column D,...
VarToTransfer = ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow, 3)

' Search the first 100000 records in sheet 2. If you have more records
than this, change this number.
For i = 1 To 100000
' Suppose the key is stored in column A in sheet 2. Change 1 to 2 if
it is in column B, ...
If ActiveWorkbook.Sheets("Sheet2").Cells(i, 1) = Key Then

' If it matches the current key, paste the variable in column c.
ActiveWorkbook.Sheets("Sheet2").Cells(i, 3) = VarToTransfer
' Move to the next row in sheet 1.
ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow + 1, 1).Select

' In column j of sheet 1, show the progress.
' WARNING: column j will be overwritten. Change 10 to other
numbers if there are data in column j.
' Delete column j before each batch of operations.
ActiveWorkbook.Sheets("Sheet1").Cells(CurrentRow, 10) = "Done"
Exit For
End If
Next

【在 w********e 的大作中提到】
: 唉。哥见你这么无助,就帮你一把。也算不上最好的办法,但是行得通,而且便于你理
: 解。
: 在你进行下面的操作之前,先把你的文件备份。要是以下操作失误,数据丢了,不要怪
: 我。
: 第一步:进入EXCEL的FILES->OPTIONS->Customize Ribbon. 在右边的main tabs里勾
: 上Developer.点OK完事。
: 第二步:点DEVELOPER菜单->Record Macro.在Shortcut Key里填个快捷键,比如q.点OK
: 完事。
: 第三步:点DEVELOPER菜单->Stop Recording Macro.
: 第四步:按alt+f11.把以下代码拷贝到 ' Keyboard Shortcut: Ctrl+q那一行下面。不

avatar
f*r
17
不错的offer,现在股价正处低谷。俺也比较看好Jack回归,是不是13年的fb就难说了。

【在 u*p 的大作中提到】
: 先报包裹:老年, 贝斯16萬5仟 + 死逃课19仟,单位股。
: 个人很看好新ceo的执行能力,现在加入twitter就好比13年加入fb。各位对twitter和
: 这个包裹咋看?包裹还有上升空间不?

avatar
A*u
18
听老夫一句劝,标用excel了。excel看似好学,其实问题多多,要实现许多简单功能需
要掌握复杂的语法和词汇。抽时间学个matlab,或者mathematica。一天就能上手。
avatar
t*l
19
太牛了,光股票就是40W!而且是当前市值。这是50W+的包裹啊,我见过最大的了。

【在 u*p 的大作中提到】
: 先报包裹:老年, 贝斯16萬5仟 + 死逃课19仟,单位股。
: 个人很看好新ceo的执行能力,现在加入twitter就好比13年加入fb。各位对twitter和
: 这个包裹咋看?包裹还有上升空间不?

avatar
d*f
20
这事没法选,ms的软件对真正的developer根本没有能用的,但是美国公司的现状就是95
%的大妈或者和不如大妈的大叔在作'技术'工作

【在 A******u 的大作中提到】
: 听老夫一句劝,标用excel了。excel看似好学,其实问题多多,要实现许多简单功能需
: 要掌握复杂的语法和词汇。抽时间学个matlab,或者mathematica。一天就能上手。

avatar
I*a
21
每年19仟股? 那真是牛,膜拜!

【在 t****l 的大作中提到】
: 太牛了,光股票就是40W!而且是当前市值。这是50W+的包裹啊,我见过最大的了。
avatar
s*v
22
我好像看明白楼主的意思了,如果我没理解错的话,很简单的嘛。
楼主的意思是这样吗?
SHEET 1
A B C
1 30 496
2 34 512
3 31 500
4 33 508
5 32 504
SHEET 2
A B C
1 30 a 496
2 31 b 500
3 32 c 504
4 33 d 508
5 34 e 512
楼主是不是想说比如在sheet1中A2输入34,C2输入512,那么sheet2中A5值是34,那么
C5的值就应该是512。
你在sheet2的C列用这个公式:
=INDEX(Sheet1!$C$1:$C$5,MATCH(A1,Sheet1!$A$1:$A$5))
EDIT: 为了配合楼主的例子换sheet1和2的顺序。
avatar
l*4
23
应该是四年的

【在 I**********a 的大作中提到】
: 每年19仟股? 那真是牛,膜拜!
avatar
OX
24
你这个初级问题,大家给了太多高级解决方案。但是你没有提供足够的细节。比如
sheet1 column a的数据是unique还是duplicate allowed。你需要把全部可能性想清楚
,列出来,再找人问。

【在 q*******n 的大作中提到】
: 昨晚发出去之后没想到大家这么热心,真心谢谢大家的帮助,尤其是蝗虫!
: 看样子还是我没有说清楚,数据太大了,传不上去。我做个简单的例子你们看看。
: Sheet1
: ------------------------
: A1 B1 C1
: A2 B2 C2
: A3 B3 C3
: ------------------------
: 在A2处输入温度值(30),在C2处输入测试值(496),其他的数值不用管。这样
: Sheet1就变成

avatar
a*8
25
包裹挺牛的!
avatar
S*t
26
楼主这是老年包裹,16.5+1.9*18.3/4也就25w/yr,似乎有些 low ball吧。FG的T4/
E4都
能拿这数吧
不过如果看好未来股票翻倍的话就还不错

【在 a********8 的大作中提到】
: 包裹挺牛的!
相关阅读
logo
联系我们隐私协议©2024 redian.news
Redian新闻
Redian.news刊载任何文章,不代表同意其说法或描述,仅为提供更多信息,也不构成任何建议。文章信息的合法性及真实性由其作者负责,与Redian.news及其运营公司无关。欢迎投稿,如发现稿件侵权,或作者不愿在本网发表文章,请版权拥有者通知本网处理。