2015-03-31 75 views
0

新手在这里,可能是这个过程。我试图填写股票代码字段中为空的数据以获取之前已知的数据。看我下面的例子。我不知道我是否应该在查询或别的东西写在MS Access 2007中试图填写数据,如果空取以前有数据

Image

因此,例如下0897250D CH股本为空或空白。我想把它之前的数据,并填写它。

+0

我知道它相当新。只是想冲击这个,看看有没有人能帮助我。谢谢。 – Freddy 2015-04-01 17:17:58

回答

0

对不起。得到了我的答案。我非常使用以下...

Sub nullparts() 
Dim i As String 

Set myDb = CurrentDb() 
Set MyRs = myDb.OpenRecordset("BB - HistoricalDividends") 
MyRs.MoveFirst 
Do While Not MyRs.EOF 
MyRs.Edit 
For Each myfld In MyRs.Fields 
If myfld.Name = "Field1" Then 
If MyRs(myfld.Name).Value <> "" Then 
i = MyRs(myfld.Name).Value 
Else 
MyRs(myfld.Name).Value = i 
MyRs.Update 
End If 
End If 

Next myfld 

MyRs.MoveNext 
Loop 

End Sub 

现在我试图完成2件事情。

1)在数据库中创建一个从Excel导入按钮 2)一旦导入,删除所有在F2上没有数据的行被删除。