بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
البحث في الموقع
Showing results for tags 'كود تلوين خلية'.
تم العثور علي 1 نتيجه
-
قمت بوضع الكود التالي Private Sub Worksheet_SelectionChange(ByVal Target As Range) g = "=type(a1)" Cells(1, 2) = g If g = 2 Then Cells(1, 1).Interior.ColorIndex = 24 Else Cells(1, 1).Interior.ColorIndex = 0 End Sub قيمة (g) هي إما (1) أو (2) تكون (g) اذا كانت الخلية (a1) رقما و تكون (2) اذا كنت الخلية (a1) حرفا عندما اشترط عليه ان يغير لون الخلية اذا كانت قيمة (g) تساوي (1) فانه لا يستجيب بمعنى أن أن قيمة (g) لا تساوي (1) وعندما استعلم الدالة عن قيمة (g) تعطيني القيمة (1). يا ترى ما الخطأ أما اذا اعطيت قيمة () لخلية اخرى واشترط قيمة الخلية الجديدة يقوم بتلوين الخلية. number or text.zip
