作者热门文章
- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我想将所有选项卡名称存储在一个字符串数组中,稍后我将用于其他事情。我目前的问题是,我想将我的数组填充到一个单独的函数中,完成后,将它交还给我的主子。
它抛出
Can't assign to array
Sub Captions_Formatting()
Dim tabName() As String
Dim totaltabs As Long
Dim ws As Worksheet
Dim captionlines As Integer
totaltabs = get_Tabs
tabName = getTabNames(ws, totaltabs)
End Sub
Function getTabNames(ws As Worksheet, totaltabs As Long) As String()
Dim i As Integer
ReDim tabName(totaltabs)
For Each ws In Sheets
If ws.Name <> "Overview" Then
tabName(i) = ws.Name
i = i + 1
End If
Next ws
getTabNames = tabName
End Function
最佳答案
您需要键入数组以匹配函数返回类型:
ReDim tabName(totaltabs) As String
关于arrays - 将数组从函数返回到主子,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/48280294/
我是一名优秀的程序员,十分优秀!