Board logo

標題: A1下拉選單,符合某產品控制不能輸入資料,底色變水藍 [打印本頁]

作者: hero_lin    時間: 2020-4-20 17:52     標題: A1下拉選單,符合某產品控制不能輸入資料,底色變水藍

A             B             C              D
1 產品        數量        單價        總價
2 橘子          2             不用輸入       
3 蘋果          3                 13                 39
4 鳳梨          1                 18                18
5 橘子          6             不用輸入       
6 奇異果          3                21            63

大家好:
我有一個產品表格,其中產品是下拉式選單,當選擇到"橘子"產品時,單價欄位要出現"不用輸入"並控制不能輸入且儲存格底色變為"水藍色"
請教如何設定條件。
謝謝
作者: rouber590324    時間: 2020-4-22 09:46

試試

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Sheet1.Range("C:C")
X = Sheet1.[A65536].End(xlUp).Row
For M = 2 To X
If Sheet1.Cells(M, 1) Like "*橘子*" Then
' If 1 = 1 Then
   Sheet1.Cells(M, 3) = "不用輸入"
   Sheet1.Cells(M, 3).Interior.ColorIndex = 34
  End If
Next
End With
End Sub




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)