在24小時後自動凍結一列或多行

我想基於時區凍結列或行（以可能爲準）。這意味着我想在特定日期自動凍結列或行，一天從1jan變爲2jan等等。在24小時後自動凍結一列或多行

樣本數據如下[數據輸入（行或列）凍結，因爲這一天是交叉的，第二天是開放]。（難以添加圖片，因爲我需要10點才能做到這一點。）

請建議。

謝謝。

的樣本數據如下：

日期ABC123 def223廣告DF 30/06/2014你好休假喜（忘記輸入） 2014年1月7日（忘記輸入）喜（忘記輸入）做 2014年2月7日
2014年3月7日

或

日期30/06/2014 2014年1月7日2014年2月7日2014年3月7日 ABC123你好（忘了進入）
休假喜
廣告喜個def223（忘記輸入）
DF（忘記輸入）做

來源

2014-07-02 user3719622

請嘗試自己。 –

這個問題似乎是脫離主題，因爲你沒有嘗試過任何東西。這不是你的工作流程。 – rayryeng

撇開你自己解決這個問題的努力不足，你問的是鎖定一列還是一行，還是將某些行或列凍結了？ – asp8811

Sub Test() 

Dim Tdate As Date 
Dim DateRow As Long, FCol As Long 

Tdate = Format(Date, "dd/mm/yyyy") 

DateRow = 3 'Number that your dates are on (in row) 

FCol = Sheets("Sheet1").Cells(DateRow, 1).EntireRow.Find(What:=Tdate, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False).Column 

Columns(FCol).Offset(0, 1).Select 

ActiveWindow.FreezePanes = True 

End Sub

這將搜索今天的日期在您指定的行（Tdate）。如果找到，它將凍結窗格，以便該列是凍結區中包含的最後一列。請注意，這將使所有東西都保持冷凍。如果您每天都在做日常事務，那麼這並不理想，因爲您最終還是會在凍結窗格中結束前幾天。但這是我能從你的問題中得到的。

請編輯和使用你喜歡的

來源

2014-07-02 12:55:45 SilverShotBee

謝謝銀，但它不會工作。 – user3719622

plz給你的郵件ID如果你可以，我會發送你的圖像澄清，因爲只有我可以做。 – user3719622

對不起，但我提供的內容可能無法以其**完全**格式工作，但您至少可以嘗試修改它，使用它並更新您的答案。我不打算在這裏坐下來重寫它，直到它符合您的具體要求而不需要代表您的任何嘗試。這不是如何工作！ – SilverShotBee

在24小時後自動凍結一列或多行

回答

相關問題