如果一个单元格的值将相邻的单元格移动到该位置

我有一些这样的数据：

 上游6.36
下游6.25
下游6.36
上游6.25 

我想要的是，如果单元格表示Upstream ，则将单词“ Upstreamreplace为单元格旁边的值，例如6.36 。

Answer 1

假设第一个Upstream在A1和第一个6.36在B1，一个简单的公式可能就足够了。 在两个现有的和B1之间插入一列：

 =IF(A1="Upstream",C1,A1) 

复制下来以适应。 selectColumnB，复制，粘贴特殊值，在顶部删除ColumnA。

Answer 2

你可以使用下面的代码来做你想做的事情：

 Dim i As Integer For i = 1 To 4 If Cells(i, 1).Value = "Upstream" Then Cells(i, 1).Value = Cells(i, 2) End If Next i