eclipse專案有紅色驚嘆號
eclipse在專案視窗中有紅色驚嘆號出現時,是該專案引用的一些外部JAR檔出現對應不到的情況 解決方式只需在Configure Build Path中,把有問題的引用導正或刪除即可
發表文章
EXCEL VBA檔案另存成PDF,另存成XLSX加密碼
Function saveFile_13(name, month) Dim RS As New ADODB.Recordset sPath = ThisWorkbook.Path Sheets("13").Select Application.ScreenUpdating = False X="A1234567890" If Len(Trim(X)) > 0 Then Application.DisplayAlerts = False pw = Left(X, 1) & Right(X, 5) '另存成PDF 'Sheets("13").ExportAsFixedFormat Type:=xlTypePDF, Filename:=sPath & "\" & Replace(name, "*", "") & "_" & month & "個月.pdf" '另存xlsx Worksheets...
VBA 另存CSV檔(UTF-8),將篩選內容轉存至指定儲存格
Sub doExport_13() Dim rng As Range '自動篩選結果範圍 b1 = Now With Sheets("13_整理") .Activate 'Worksheets("25").Activate Set rng = .UsedRange '所有資料範圍 Dim fsT As Object Dim tFilePath As String tFilePath = ThisWorkbook.Path & "\" & "13_pw.csv" 'Create Stream object Set fsT = CreateObject("ADODB.Stream") fsT.Type = 2 fsT.Charset = "utf-8" fsT.Open fsT.WriteText "A1,A2,A3" + Chr(13) '標頭 rng.AutoFilter '設定自動篩選 ...
excel vba 將篩選的值另外存至其他儲存格
Sub doFilterGroup_13_整理() Dim d, rng As Range, cel As Range Set d = CreateObject("scripting.dictionary") '建立 Dictionary物件 '先將目的地的儲存格清成空白 With Worksheets("執行") Set rng = .[q:q] rng.Value = "" End With With Worksheets("13_整理") Set rng = .[b:b] '設定B欄為要篩選資料的範圍 .Activate End With '將資料塞入Dictionary的物件中 For Each cel In rng If cel.Value <> "" Then d(cel.Value) = "" Next '將篩選後的不重複值存入Sheets("執行").[Q1]中 Sheets("執行").[Q1].Resize(d.Count) = Application.Transpose(d.keys) End Sub
git 推送時出現error: RPC failed; HTTP 413 curl 22 The requested URL returned error: 413
git推送檔案進GITLAB時出現以下錯誤訊息: error: RPC failed; HTTP 413 curl 22 The requested URL returned error: 413 修改gitlab server上的nginx的上傳檔案大小限制 Nginx.conf default configuration without litent_max_body_size https://www.programmersought.com/article/38551797065/
java 執行時出現OutOfMemory錯誤
-Xms<size> 設定java一開始執行的初時值 -Xmx<size> 設定java使用記憶體的最大值 java java -jar -Xms512m -Xmx4096m test.jar -->初始記憶體為512MB 最大使用記憶體為4096MB
