【Excel VBA教學】如何將VBA程式加密碼

我們在寫程式時，有時候基於某些原因，例如有密碼保護，若使用者直接查看程式碼就會知道密碼，這時候就可以將VBA加密讓使用者無法查看原始碼。 工具/VBAProject屬性/保護/ 勾選【鎖定專案已供檢視】/再輸入密碼 PS:要有程式碼程式加密才會有作用 副檔名要儲存成.xls或是.xlsm

筆電接投影機時原筆電螢幕無法顯示

 今天遇到一台HP 331 windows xp筆電，只要一接投影機時，原本的螢幕就會變成黑色，按ctrl+P及設定都找不到同時顯示，最後是在桌面點滑鼠右鍵/圖形選項中找到雙顯示器的設定才解決。

1.HP 331筆電

2.設定被設定為顯示器

3.在桌面點滑鼠右鍵/圖形選項/輸出至

4.雙顯示複製畫面/筆記型電腦+監視器

花旗線上繳費動態驗證碼無法成功的解決方法

 今天用花旗的線上繳信用卡費，一直輸入驗證碼都不能成功，最後是開啟無痕視窗才完成繳費。

1.認證碼都正確

2.出現【請重新輸入動態驗證碼】

3.改用無痕視窗輸入

4.繳費交易成功

4.繳費交易成功

Access2010如何讓查詢結果可以顯示超過10000筆

 請同事使用access連結mssql去查詢view，結果出來的資料只有前10000筆，底下教您如何設定讓它顯示全部記錄。

 

1.只有顯示10000筆資料，點最右邊的設定最大記錄筆數

2.記錄筆數上限輸入0

3.顯示全部的記錄

【Excel網友問題解答】如何利用WEEKDAY解決vlookup每周產能數量查詢問題

網友在論壇問到一個vlookup的問題，它用vlookup的模擬比對來找資料，但是資料要由小到大排序，他的資料沒有符合這個規則，最後是用WEEKDAY將同一週的日期變成星期一來解決他的問題。

網友問題:

http://discuz.bestdaylong.com/thread-39170-1-1.html

VLOOKUP 多條件下回傳 (日期參數) 值可以加總

【Appsheet教學】如何在資料表中使用虛擬欄位(Virtual Column)產生每月血壓的平均並可查看名細

Appsheet中可以加入虛擬欄位，這個虛擬欄位可以用來顯示血壓的平均，利用select語法配合[_thisrow]，搭配averag、year、month、and就可以做到，方法有點類似資料庫的查詢，只是寫法不太相同，這次加上年月就可以先看年月的平均，若有需要還可以點選展開查看細項。

Syntax

SELECT( from-dataset-column , select-row? [ , distinct-only? ] )

年月

CONCATENATE(Year([_thisrow].[日期]),"年",Month([_thisrow].[日期]),"月")

當月平均

average(select(表單回應 1[高壓],and(year([日期])=year([_thisrow].[日期]),month([日期])=month([_thisrow].[日期]))))

select語法連結:

https://help.appsheet.com/en/articles/2357314-select 

【Appsheet教學】如何在資料表中使用虛擬欄位(Virtual Column)產生每日每月量血壓的平均

 Appsheet中可以加入虛擬欄位，這個虛擬欄位可以用來顯示血壓的平均，利用select語法配合[_thisrow]，搭配averag、year、month、and就可以做到，方法有點類似資料庫的查詢，只是寫法不太相同。

Syntax

SELECT( from-dataset-column , select-row? [ , distinct-only? ] )

當天平均:

average(select(表單回應 1[高壓],[日期]=[_thisrow].[日期]))

當月平均

average(select(表單回應 1[高壓],and(year([日期])=year([_thisrow].[日期]),month([日期])=month([_thisrow].[日期]))))

select語法連結:

https://help.appsheet.com/en/articles/2357314-select 

【Excel網友問題解答】如何在相同資料的第1筆做加總

 網友問到要在相同的資料中，只有第一筆顯示加總，其餘欄位顯示0，這個要用到countif找出第一筆，再用if跟sumif就可以做到。

網友問題網址:

http://discuz.bestdaylong.com/thread-39173-1-1.html

如何判斷與回填資料

【windows教學】如何在windows10上傳及下載ftp檔案

 若您要windows10中不安裝filezela等ftp軟體，可以透過windows在檔案總管中下ftp語法就可以連線，若只是下載在browser輸入也是可以，要上傳一定要在檔案總管中使用，還有不要上傳有中文的檔案，可以上傳但是無法刪除及改名及下載。

【Excel網友問題解答】如何將一個儲存格的段落內容分別放到其它單一儲存格

 網友問到有人在一個儲存格內輸入了許多資料,用段落符號分格.可有辦法將每筆資料分別列在其他的單個儲存格內?

這個用VBA解決會比較簡單，底下是解題的方法。

1.段落符號在VBA是用chr(13)或chr(10)來表示

2.切割文字是用split，回傳陣列從0開始

3.如何知道陣列大小ubound回傳陣列最大索引

4.將多餘的字換掉replace

網友問題連結: http://discuz.bestdaylong.com/thread-39163-1-1.html

【MSSQL】此後端版本不支援設計資料庫圖表或資料表

 安裝MSSQL 2019後，匯入舊版的資料庫操作都沒什麼問題，只是想說建一個新的資料庫來做練習，剛建完資料表按下【此後端版本不支援設計資料庫圖表或資料表。 (MS Visual Database Tools)】，上網查詢發現是SSMS的版本太舊，更新後就解決這個問題。

1.出現的錯誤

2.查看資料庫版本是2019

3.SSMS是17.9.1版本

4.上網更新到18.8後開啟選從SSMS17匯入

5.點選【關閉】

6.可以設計資料表了

6.可以設計資料表了

【MSSQL】SSMS v18.X找不到偵錯按鈕

 最近想用偵錯找預存程序的問題，結果在SSMS v18.X找不到偵錯按鈕，換另一台SSMS v17.X就看到偵錯按鈕，偵錯要在本機執行，若不是本機還要設定防火牆才可以使用。

1..ssms v18.X只有執行的按鈕

2.ssms v17.X有偵錯按鈕

【MSSQL】Transact-SQL 伺服器資料指標cursor的用法

 cursor的語法是可以將查詢的結果一次取一筆，再針對每筆的變數去做不同的應用，今天先用cursor將每筆資料取出並列印出來。

1.先用select * from book查看資料庫筆數

2.定義cursor的變數及sql語法

3.宣告一個變數將cursor的值取出

4.使用@@FETCH_STAUS來判斷是否有讀取到資料

5.配合while讀出所有資料

語法網址: http://bestdaylong.com/tmh-n-mustedu#password

【Appsheet教學】如何在Appsheet做關連式下拉選項

 在代售的雞精中有設定產品代碼及產品名稱，如何在銷售記錄中可以選產品名稱儲存產品代碼，這時候就可以用ref這個型別，還要將產品名稱設為Label才會顯示產品名稱，否則會顯示產品代碼。

UNIQUEID()  產生不重複文字

增加ref型別會自動在被參照的資料表中新增一欄[Related 銷售記錄s]的List型別

Info 中的關連圖要重新整埋才能看到

【Appsheet教學】如何將錯誤訊息改成中文

Appsheet在輸入資料時，若是資料出現重複或是輸入欄位無效，還是要提示使用者是必填欄位，都是出現英文，您可以針對這些訊息改成您想要顯示的中文顯示。

UX/Localize

There is already a row with the key 'A001'

This entry is invalid  

您輸入的值重複或是無效。

This entry is required

這是必填欄位。

Save 儲存

Cancel 取消

【MSSQL教學】還原資料庫發生錯誤 "無法獲得獨佔存取權,因為資料庫正在使用中"

 MSSQL在還原資料庫時出現"無法獲得獨佔存取權,因為資料庫正在使用中"，這時候只要將要還原的資料庫把它改成【離線工作】後就可以顺利還原。

1.出現的錯誤

2.【資料庫】/【工作】/【離線工作】

【Appsheet教學】如何提示使用者輸入資料重複

 有網友問到Appsheet如果有重複的資料（客戶資料重複）要如何編寫參數可以提示使用者資料重複了，所以就研究一下，發現只要在資料欄位的Data Validity

中的Valid If輸入指令就可以解決這個問題。

參考資料: https://community.appsheet.com/t/check-if-value-exists-in-table/15997/2

NOT(IN([產品名稱],一整天代賣商品[產品名稱]))

IN([產品名稱],一整天代賣商品[產品名稱])

一整天代賣商品

ㄚ母滴雞湯_原味滴雞湯【1盒10包入，每包80cc】

ㄚ母滴雞湯_四物滴雞湯【1盒10包入，每包80cc】

ㄚ母滴雞湯_粉光蔘滴雞湯【1盒10包入，每包80cc】

ㄚ母滴雞湯_人蔘蔘滴雞湯【1盒10包入，每包80cc】

香純滴雞精_一般10包送2包(單包150元/150cc)

香純滴雞精_人蔘10包送2包(單包150元/180cc)

香純滴雞精_粉光10包送2包(單包150元/180cc)

【網友Excel問題解答】如何依給付日比較早的要保人日期排在前面又可將相同要保人排序在一起

 網友問了一個雙重排序的問題，用一般的排序不管是要保人或是給付日都不是他要結果，看了他的問題除非加一個輔助欄位，這個欄位都是儲存每個人的最早給付日，再依這個欄位去排序才會是他想要的結果，我們會先用if找出每個人的要保日期，再用min找出最早日期，其中找不到的話我會給一個10^9來讓它變成最大的數字，這樣才可以保證找出的是最早日期。

陣列公式輸入 ctrl+shift_enter 

按完公式前後會自動出現{}

範例檔案:

http://download.bestdaylong.com/f854.htm

雙重排序(陣列公式應用).xlsx

Iphone的Line出現【Line想要取用您的照片】

 最近Iphone升級14.3後第一次進入Line對話，都會出現【Line想要取用您的照片】，您要都選【選取更多照片...】與【保留目前所選範圍】，若您覺得很煩可以進到iphone的設定，找到Line將原本照片的【所選的照片】把它改成【所有照片】就不會再出現。

1.第一次進入Line對話都會出現這個畫面

2.到Iphone的設定點選【Line】

3.點選【所選的照片】

4.勾選【所有照片】

【Google表單教學】如何利用chrome來偵錯前端javascript錯誤

 偵錯是寫程式的基本功，很多初學者不會使用，執行時就找不到錯在那裡，今天就用網友的例子來做教學，他犯了一般初學者都會遇到的問題，就是變數用到保留字(Date,confirm,location,status)

在chrome按[F12]

切換到[Sources]/點選[Open File]開啟目前檔名相同名稱.

colsole.log 在控制台中顯示

網友問題

http://discuz.bestdaylong.com/thread-39041-3-1.html

前端:

https://lst2021.blogspot.com/2021/01/var-datereviver-function-key-value-var.html

範例: http://bestdaylong.com/html/inq05a.htm

【Google教學】如何將google試算表分享其他人檢視

 什麼時候會用到這個功能，就是在做教學時，想要把範例檔案給學生，但是又不要學生可以修改，若學生要修改可以建立複本再自行修改。

點選右上角【共用】圖示/點選【取得連結】

將【限制】改成【知道連結的使用者】再複製連結。

如何解決Crystal Reports 登錄機碼權限不足，或是 Crystal Reports 執行時間的安裝不正確

 將Crystal Reports由windows 2003移到windows 2019結果在顯示報表時出現如下訊息。

---訊息開始---

嘗試載入 Crystal Reports 執行時間時，發生錯誤。

可能是 Crystal Reports 登錄機碼權限不足，或是 Crystal Reports 執行時間的安裝不正確。

請安裝適當的 Crystal Reports 可轉散佈程式 (CRRedist*.msi)，其中包含所需的正確 Crystal Reports 執行時間版本 (x86、x64 或 Itanium)。如需詳細資訊，請至 http://www.businessobjects.com/support。

--訊息結束---

最後解決方法是到IIS的應用程式集區，找到使用名稱，將啟用32位元應用程式由False改成True就可以解決這個問題。

1.出現的錯誤

2.到IIS的應用程式集區，找到使用名稱，點選滑鼠右鍵選【進階設定】

3.將啟用32位元應用程式由False改成True就可以解決這個問題

如何將核取方塊所選的多個選項拆成一個儲存格存放一個選項【Google表單教學】

 在Google表單中若使用核取方塊，使用者可以選取多個選項，但是結果會存放在一個儲存格中，並且使用, 做為分隔，有沒有什麼方式可以將它拆成一個儲存格一個選項。

在試算表中可以使用split函數。

若試算表跟表單是連動的就要使用arrayformula

出現錯誤要在使用iferror

選項:

ㄚ母滴雞湯_原味滴雞湯【1盒10包入，每包80cc】

ㄚ母滴雞湯_四物滴雞湯【1盒10包入，每包80cc】

ㄚ母滴雞湯_粉光蔘滴雞湯【1盒10包入，每包80cc】

ㄚ母滴雞湯_人蔘蔘滴雞湯【1盒10包入，每包80cc】

香純滴雞精_一般10包送2包(單包150元/150cc)

香純滴雞精_人蔘10包送2包(單包150元/180cc)

香純滴雞精_粉光10包送2包(單包150元/180cc)

【網友問題解答】為什麼ExcelVBA使用end找最後一行空白會錯誤

 網友來信問到使用我的ExcelVBA改成他自己的程式，為什麼會出錯，由這個例子順便說明一下觀念及如何除錯。

範例網址:http://download.bestdaylong.com/f853.htm

使用end找最後一筆空白的問題

windows 2019 IIS 出現【HTTP 錯誤 500.19】

 在windows 2019的IIS設定執行asp.net的網頁，結果執行時網頁出現，

-----------------------

錯誤碼

0x80070021

設定錯誤

這個設定區段不能在這個路徑中使用。當區段在父層級被鎖定時就會發生這種情況。鎖定可能是預設 (overrideModeDefault="Deny")，或是由位置標記使用 overrideMode="Deny" 或繼承的 allowOverride="false" 明確設定。

------以上是錯誤訊息

找到最後是因為沒有安裝asp.net所造成，底下會說明如何安裝。

1.應用程式集區若只有一個DefaultAppPool代表您沒有安裝asp.net

2.執行時出現的錯誤

3.在【應用程式開發】要勾ASP.Net3.5跟asp.Net4.7、.NET擴充性3.4、.NET擴充性4.7、ISAPI篩選器、ISAPI擴充程式

4.應用程式集區出現.NET V2.0與.Net 4.5