主题：[求助]最近问了好几个问题，也解决了一些！然而自己也未能完美解决~所以把我要做的东西放出来，希望哪位高手能够解决剩下的问题，感激不尽！

好像合并的单元格不灵啦，未合并的单元格能够自动换行，完全显示内容。

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Cells
Rg.EntireRow.AutoFit  '自动调整行高
App.Visible = True

 我也测试了一下，大概像12楼的代码，无效。无法自适应的。

突然想到一个问题。如果我数据表里有一列为”Country“,另一列为”国家“。我想如果我输入Country的值，同时”国家也自动生成对应的值。这个类似于，excel里的vlookup对不？ 如何做呢？需要另一个表格对不？另一个表格其中一行为：USA  美国 这样就成立。请指教一下。谢谢 

这跟汉字列与拼音列，编号列与名称列，一样的关系。