簡體   English   中英

Xlwings + Excel + Python3 公式指導

[英]Xlwings + Excel + Python3 Formula guidance

(Python3, Sublime Text3, Anaconda, XLWINGS) Google Doc Of Excel 來簡化我的問題

https://docs.google.com/spreadsheets/d/1lMptWhE6MjvK0_S4J25kzDRwl45oEfqSceZR5POYcJ8/edit?usp=sharing

我正在尋求幫助,以便從 excel -> python -> excel 進行我編寫的一個簡單模擬項目。 鏈接到在不到 10 秒內解釋我的目標的圖像(

簡而言之,我在 excel 中有一個列表,我希望 python 函數在 excel 中請求一個適用於列表(b 列)的范圍,導入適合所述范圍的行,使用基本公式來分析列 d 和 e 值( (.4*user test score)+(.6*participation)),然后將前兩個分數的完整行(函數計算出來的)導出回excel。 輸出只是我給定范圍內前兩名考生的相同行

注意:這不適用於任何作業,僅用於自學。 進行脊柱手術,所以有時間在我手上。 我不希望有人提供解決方案,因為我相信你們都比我忙得多,但是有用的鏈接(鑒於這很簡單,我找不到很多相關的鏈接)會很好。 雖然我有很多關於 Python3 的文檔,但缺乏 XLWINGS 與 Sublime 文本的集成。

謝謝

注意我知道這可以在 Excel 和 Exclusively VBA 中完成,但這更多的是通過一個簡單的演示來了解集成。

想通了。 它在新工作表而不是舊工作表上輸出,但工作正常。

G 是我要排序的表格的列行,D3/D2 是范圍輸入

Sub Range()

Dim ws As Worksheet
Dim Model As Worksheet


Set ws = ThisWorkbook.Sheets("Output")
Set One = ThisWorkbook.Sheets("Model")

If Not IsEmpty(One.Range("D2")) And Not IsEmpty(One.Range("D3")) Then
    With ws
        .Range("$G$7:$G$" & .Range("G" & Rows.Count).End(xlUp).Row).AutoFilter Field:=1, _
            Criteria1:=">" & One.Range("D2").Value, _
            Operator:=xlAnd, _
            Criteria2:="<" & One.Range("D3").Value
    End With
End If

End Sub

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM