思考
想要在 MySQL 中同時搜索多個欄位，並找到它們的最大值，可以用用 GREATEST() 函數。
這個函數接受多個參數，並返回這些參數中的最大值。
SELECT GREATEST(column1, column2, column3) AS max_value
FROM your_table;
在這個示例中，column1、column2、column3 是你要搜索的多個欄位，your_table 是你的表名。這個查詢將返回這些欄位中的最大值作為 max_value 列的結果。
你可以根據需要將欄位和表名替換為你實際使用的值。
SELECT MAX(GREATEST(column1, column2, column3)) AS max_value
FROM your_table;
SELECT MIN(LEAST(column1, column2, column3)) AS max_value
FROM your_table;
大中取小也可以
SELECT MIN(GREATEST(column1, column2, column3)) AS max_value
FROM your_table;
小中取大：
SELECT MAX(LEAST(column1, column2, column3)) AS max_value
FROM your_table;
如果有兩個條件要查詢，但是這條件是多組成對的條件，例如A1與B1一組， A2與B2一組以此類推這樣做查詢，且這兩個條件是超過100組的，我該怎做?
假設你有一個表 your_table，包含欄位 A 和 B，你想要查詢符合多組成對條件的記錄，可以像這樣組合你的查詢：
SELECT *
FROM your_table
WHERE (A, B) IN ((A1, B1), (A2, B2), ...);
這樣的查詢將同時匹配所有組合 (A1, B1)、(A2, B2) 等。請確保將實際的值替換為你的組合數據。
在這個範例中，A 和 B 是你表中的欄位名稱，而 (A1, B1)、(A2, B2) 等則是你要查詢的具體值。這個查詢將返回表中符合給定條件的記錄。請確保將 your_table 替換為你實際的表名，A1、B1、A2、B2 等則替換為你要查詢的實際值。
指數變化(2024.04.19)
上周焦點：
台股跳水
2330 法說會
本周愛看：
美國耐久財訂單月增率
美國首次申請失業救濟人數
美國GDP成長年率
美國連續申請失業救濟人數
美國個人所得月增率
美國個人支出月增率
本周指數變化：
自學MYSQL的缺點，就是書本通常沒翻完就開始寫了，所以要透過網路學習更多基礎知識
VARCHAR是最近學到的新用法，自己也做一下學習紀錄。
出處：https://blog.csdn.net/sanqima/article/details/123092463
如何透過vba產生資料夾??
Scripting.FileSystemObject作法：
Sub TEST1()
Dim fs As Object
Dim newFolder As Object
Dim folderPath As String
' 建立 FileSystemObject
Set fs = CreateObject("Scripting.FileSystemObject")
' 設定新資料夾的路徑
folderPath = "C:\MyNewFolder"
' 建立新資料夾
Set newFolder = fs.CreateFolder(folderPath)
' 顯示訊息
MsgBox "已成功建立資料夾：" & folderPath
End Sub
更簡單的方式，使用MkDir：
Sub TEST12()
Dim folderPath As String
Dim newFolder As String
Dim i As Integer
Dim NumFolders_I As Integer
' 設定父資料夾路徑
folderPath = "C:\Users\YourUsername\Documents\Projects\"
' 設定要建立的資料夾數量
NumFolders_I = 10
' 建立資料夾
For i = 1 To NumFolders
FolderName = "Project_" & i
MkDir folderPath & FolderName
Next i
End Sub
vba 列印設定中，如何自訂頁首與頁尾文字內容 怎做?
頁首
ActiveSheet.PageSetup.CenterHeader = "&D &B&ITime:&I&B&T"
頁尾
ActiveSheet.PageSetup.CenterFooter = "&D &B&ITime:&I&B&T" ActiveSheet.PageSetup.CenterFooter = "&P"
頁首左、中、右
With ActiveSheet.PageSetup.LeftHeader = "aaa"
.CenterHeader = "&""-,粗斜體""bbb"
.RightHeader = "ccc"
End With頁尾左、中、右
With ActiveSheet.PageSetup
.LeftFooter = "aaa"
.CenterFooter = "&""細明體,標準""頁數&""Times New Roman,標準"":&P/&N" & Chr(10) & "PAGE:&P/&N" & Chr(10) & "ddd"
.RightFooter = "ccc"
End With其他頁尾格式設定：您可以使用以下特殊格式代碼來自訂頁尾： &L：將下一筆字元靠左對齊。 &C：將下一筆字元置中。 &R：將下一筆字元靠右對齊。 &D：列印目前日期。 &T：列印目前時間。 &F：列印文件名稱。 &A：列印活頁簿標籤名稱。 &P：列印頁碼。 &P+number：列印頁碼加上指定數字。 &P-number：列印頁碼減去指定數字。
列印設定中，如果要設定不同儲存格來列印 怎做?
設定列印範圍是用 PageSetup列印的PrintArea做設定，
不同儲存格間要透過union方式來神助力
Set ws = Sheets("Sheet1") '用Sheet1當作設定對像工作表名稱
'Union 設定列印儲存格範圍
Set bigRange = Application.Union(ws.Range("a1"), ws.Range("c2"))
ws.PageSetup.PrintArea = bigRange.address
列印設定中，如果要設定列印邊界 怎做
是用 PageSetup列印的屬性設定，有四個邊界可以設定
Set ws = Sheets("Sheet1") '用Sheet1當作設定對像工作表名稱
' 設定列印儲存格範圍
ws.PageSetup.PrintArea = "$A$1:$F$10
' 設定邊界
With ws.PageSetup
.LeftMargin = Application.InchesToPoints(0.5) ' 設定0.5 英寸左邊界
.RightMargin = Application.InchesToPoints(0.5) ' 設定0.5 英寸右邊界
.TopMargin = Application.InchesToPoints(0.75) ' 設定0.75 英寸上邊界
.BottomMargin = Application.InchesToPoints(0.75) ' 設定0.75 英寸下邊界
End With
'公分版
With ws.PageSetup
.LeftMargin = Application.CentimetersToPoints(2.54) ' 設定左邊界 (2.54 公分 = 1 英寸)
.RightMargin = Application.CentimetersToPoints(2.54) ' 設定右邊界 (2.54 公分 = 1 英寸)
.TopMargin = Application.CentimetersToPoints(1.905) ' 設定上邊界 (1.905 公分 = 0.75 英寸)
.BottomMargin = Application.CentimetersToPoints(1.905) ' 設定下邊界 (1.905 公分 = 0.75 英寸)
End With
指數變化(2024.04.04)
上周焦點：
美國3月非農業就業人數增30.3萬遠超預期 失業率意外降至3.8%
fed 紐約分行預測衰退機率 持平，維持在58.31%
本周指數變化：
列印設定中，如果列印要水平置中 怎做?
ActiveSheet.PageSetup 列印設定的屬性是用 CenterHorizontally
水平置中:
ActiveSheet.PageSetup.CenterHorizontally = True
水平與垂直置中:
With ActiveSheet.PageSetup
.CenterHorizontally = True
.CenterVertically = True
End With
