对Excel操作选择性粘贴在VB里如何写？

对Excel操作选择性粘贴在VB里怎么写？急
我这前在VBA里写的是这样的

LG.Activate

                                        

LG.Cells(7, 1).Select

                                        

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

                                        

Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

我想用VB实现这个功能要怎么写啊，总是报错
------解决方案--------------------
这个不容易，excel拷贝的时候，会拷贝很多格式的数据到剪贴板，但VB除了公开的格式外，其它格式数据基本上访问不到，但可以使用API，问题是，API，你基本上是难于知道excel保存在剪贴板上的数据格式