首頁 > 軟體教學 > 辦公室軟體 > 將Excel中的公式改寫為VBA的方法詳解

將Excel中的公式改寫為VBA的方法詳解

WBOY
發布: 2024-01-05 16:25:30
轉載
1052 人瀏覽過

Excel中公式如何改寫成VBA

##設定表名為sheet1,其中A列為國名,B列為對應的編號(依實際情況自行修改)。

為了幫助尚未過關的玩家,我們可以使用以下巨集來解決難題。只需建立並執行此宏,即可達成目標。

Sub aaaa()

Dim Target As Range

Do

i = i 1

為了幫助那些還沒有通過關卡的玩家,讓我們一起來了解一下具體的解謎方法吧。在程式碼中,我們使用了「Sheet1.Range("A" & i).Text」來取得儲存格A中的文字內容。這個方法可以幫助我們取得所需的信息,然後進行相應的操作。希望這個提示能夠對大家有幫助!

Select Case aaa

Case "中國"

#Sheet1.Range("B" & i) = 2

Case "美國"

#Sheet1.Range("B" & i) = 1

Case "日本"

#Sheet1.Range("B" & i) = 0

End Select

Loop While aaa ""

##End Sub

excel公式轉VBA程式碼

你的公式的邏輯關係有點問題

你看下是不是這樣的意思

Sub test()

Dim i&, n, n1

For i = 1 To 5

If Cells(i, "D") * Pi / 180 >= 0 Then

If Cos(Cells(i, "B") * Pi / 180 - Cells(i, "I") * Pi / 180) < 0 Then

n = True

Else

n = False

End If

If Cos(Cells(i, "B") * Pi / 180 - Cells(i, "I") * Pi / 180) > 0 Then

n1 = True

Else

n1 = False

End If

If n1 = True And n = True Then k = "-1" Else k = "1"

Else

k = "1"

#End If

Cells(i, "A") = k

Next i

End Sub

以上是將Excel中的公式改寫為VBA的方法詳解的詳細內容。更多資訊請關注PHP中文網其他相關文章!

來源:docexcel.net
本網站聲明
本文內容由網友自願投稿,版權歸原作者所有。本站不承擔相應的法律責任。如發現涉嫌抄襲或侵權的內容,請聯絡admin@php.cn
熱門教學
更多>
最新下載
更多>
網站特效
網站源碼
網站素材
前端模板