当前位置：首页 > news >正文

.net使用excel的cells对象没有value方法——学习.net的Excel工作表问题

news 2025/8/4 15:33:57

$exception {"Public member 'Value' on type 'Range' not found."} System.MissingMemberException

代码
- 准备运行
- 问题解决
- - 1. 下载别的版本的.net框架
  - 2. 安装
  - 3. 运行

代码

Imports Excel = Microsoft.office.Interop.Excel
Public Class Form1Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click'声明Excel对象Dim appXL As Excel.Application'声明工作簿对象Dim wbXL As Excel.Workbook'声明工作表对象Dim shXL As Excel.WorksheetDim raXL As Excel.RangeappXL = CreateObject("Excel.Application")appXL.Visible = True'添加一个工作表wbXL = appXL.Workbooks.AddshXL = wbXL.ActiveSheet'给工作表添加表头shXL.Cells(1, 1).Value = "First Name"shXL.Cells(1, 2).Value = "Last Name"shXL.Cells(1, 3).Value = "Full Name"shXL.Cells(1, 4).Value = "Specialization"'设置A1:D1加粗，垂直居中With shXL.Range("A1", "D1").Font.Bold = True.VerticalAlignment = Excel.XlVAlign.xlVAlignCenterEnd With'创建一个数组作为表格中的值去填充Dim students(5, 2) As Stringstudents(0, 0) = "Zara"students(0, 1) = "Ali"students(1, 0) = "NuHa"students(1, 1) = "Ali"students(2, 0) = "Arilia"students(2, 1) = "RamKumar"students(3, 0) = "Rita"students(3, 1) = "Jones"students(4, 0) = "Umme"students(4, 1) = "Ayman"'把上述学生数组的姓和名填入表格A2:B6shXL.Range("A2", "B6").Value = students'用类似的格式填充C2:C6raXL = shXL.Range("C2", "C6")raXL.Formula = "=A2 & "" "" & B2"'填充D2:D6的值With shXL.Cells(2, 4).Value = "Biology".Cells(3, 4).Value = "Mathmematics".Cells(4, 4).Value = "Pyhsics".Cells(5, 4).Value = "Mathmematics".Cells(6, 4).Value = "Arabic"End With'自动调整列A:DraXL = shXL.Range("A1", "D1")raXL.EntireColumn.AutoFit()'确保表格是可见的，且能被用户控制appXL.Visible = TrueappXL.UserControl = True'相关的对象引用raXL = NothingshXL = NothingwbXL = NothingappXL.Quit()appXL = NothingExit SubErr_Handler:MsgBox(Err.Description, vbCritical, "Error: " & Err.Number)End Sub
End Class

窗体很简单，就是一个按钮触发
在这里插入图片描述