بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
-
Posts
4,431 -
تاريخ الانضمام
-
Days Won
191
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو أ / محمد صالح
-
دالة importxml تستعمل لجلب محتويات جزء معين من صفحة ويب إلى جوجل شيت وصورتها العامة هي =IMPORTXML(url, xpath_query) ولا تستعمل لفتح رابط مباشرة ولمزيد من المعلومات هنا https://support.google.com/docs/answer/3093342?hl=ar بالتوفيق
-
ماهو الفرق بين هذين الدالتين (LOOKUP) (VLOOKUP)
أ / محمد صالح replied to alialatabe's topic in منتدى الاكسيل Excel
موضوع اتجاه البحث في vlookup يمكن التغلب عليه الميزة في lookup انها تبحث في الصفوف والأعمدة كبديل للاثنين معا vlookup و hlookup بالتوفيق -
جميعا بإذن الله 👍🌹😍
-
بالنسبة للمطلوب الاول حاول تصدير الملف مرة أخرى من الحساب الخاص به فربما يوجد خطأ في عملية الإنشاء بالنسبة للمطلوب الثاني فهذا طبيعي جدا حيث ان ملف pst يحتوي على الرسائل اوفلاين بدون اتصال وربما يتم حذفها من خادم البريد اما الجهاز الآخر فبدايته من الرسائل الموجودة على سيرفر البريد بالتوفيق
-
بخصوص قراءة الإيميل للمتلقي و وصول مسج للمرسل بالقراءة
أ / محمد صالح replied to aaaburahi's topic in منتدى الاوتلوك Outlook
حتى يصلك إعلام بالقراءة لابد من موافقة المستخدم يمكنك استعمال الإعلام بوصول الرسالة delivery بالتوفيق -
إرسال مرفقات برقم واتس عن طريق الاكسس
أ / محمد صالح replied to hosslom's topic in قسم الأكسيس Access
لا أدري ما سبب تكرار المواضيع -
يمكنك استعمال هذا المعيار >=IIf(Format(Now(),"h")<8,Format(DateAdd("d",-1,Now()),"yyyy/mm/dd"),Format(Now(),"yyyy/mm/dd")) بالتوفيق
-
سياسة الخصوصية في جميع المتصفحات تمنع فتح الروابط إلا بحدث مثل النقر على كائن مثلا
-
جميعا بإذن الله
-
أكثر شيء يصعب مهمة المعادلات دمج الخلايا لذا تم فك الدمج في جمبع الخلايا تم وضع جميع التقييمات متجاورة في شيت الأوزان تم اضافة مجموعة من الخلايا لتحدد عمود المسمى الوظيفي في شيت الأوزان بالتوفيق تقييم الموظف 2021.xlsx
-
رسالة Run-time error 9 subscript out of range
أ / محمد صالح replied to Alaaq3's topic in منتدى الاكسيل Excel
ربما يكون هذا هو المطلوب الثاني فلترة_2.xlsm -
حذف سطر عند وجود قيمة سالبة في العمود
أ / محمد صالح replied to rammez's topic in منتدى الاكسيل Excel
على افتراض أن العمود الذي به القيم السالبة هو A يمكنك استعمال هذا الكود For n = 2 To Cells(Rows.Count, "A").End(xlUp).Row If Cells(n, "A").Value < 0 Then Rows(n).Delete n = n - 1 End If Next n MsgBox "Done by mr-mas.com" بالتوفيق -
هل لا يمكن عمل تراجع لملف تم حفظه والخروج منه
أ / محمد صالح replied to gamalin2's topic in منتدى الاكسيل Excel
إذا لم تكن مفعل version history من تبويب file ثم info فلا مجال للرجوع لنسخة احتياطية من الملف بالتوفيق- 1 reply
-
- 1
-
بالنسبة لموضوع إضافة حقل المدرسة والفصل لملف الاكسل يمكنك استعمال هذا الكود قبل كود الاستيراد 'Tools ->References -> Microsoft Excel Object Library Dim xlapp As Excel.Application, xlBook As Excel.Workbook, xlSheet As Excel.Worksheet Dim ExcelPath As String, lastRow As Long, lastcolumn As Long ExcelPath = CurrentProject.Path & "\ExcelFileName.xlsx" Set xlapp = CreateObject("Excel.Application") Set xlBook = xlapp.Workbooks.Open(ExcelPath) Set xlSheet = xlBook.Worksheets(1) With xlSheet lastRow = .Cells(.Rows.Count, "B").End(xlUp).Row lastcolumn = .Cells(1, .Columns.Count).End(xlToLeft).Column .Cells(1, lastcolumn + 1) = "school field title" .Range(.Cells(2, lastcolumn + 1), .Cells(lastRow, lastcolumn + 1)) = "school field value" .Cells(1, lastcolumn + 2) = "class field title" .Range(.Cells(2, lastcolumn + 2), .Cells(lastRow, lastcolumn + 2)) = "class field value" End With xlBook.Close 1 Set xlSheet = Nothing Set xlBook = Nothing Set xlapp = Nothing مع مراعاة تفعيل مرجع اكسل من قائمة tools وتغيير اسم ملف الاكسل واسم عنوان حقل المدرسة وقيمة حقل المدرسة واسم عنوان حقل الفصل وقيمة حقل الفصل بالتوفيق
-
كود بحث بأى جزء من الإسم بالتكست بوكس
أ / محمد صالح replied to ملاك هارون's topic in منتدى الاكسيل Excel
الكود فعلا يحدد نطاق البحث في بداية الاسم للوصول لما تريد غير هذا السطر في حدث عند تغيير مربع النص10 If C Like TextBox10.Value & "*" Then إلى If C Like "*" & TextBox10.Value & "*" Then بالتوفيق -
الكود الحالي يدور في حلقة في خلايا العمود I فإذا وجد الاسم المطلوب يحدد خلية الاسم ويعطي للخلايا المجاورة لها القيم الموجودة في النموذج إذا كان اسم الصنف مكررا لأكثر من مرة فلا يجدي هذا الكود وإذا كان هذا مطلوبك إمكانية التعديل على صفوف مكررة فيجب عرضها في ليست بوكس واختيار احد السجلات منها لتعديله ربما يفيدك هذا الموضوع بالتوفيق
-
برجاء المساعدة فى كود البحث فى list box
أ / محمد صالح replied to الصفتى's topic in منتدى الاكسيل Excel
نظرا لاستعمالك Option Explicit في بداية الكود يجب الإعلان عن المتغيرات ضع هذا السطر كأول سطر في إجراء البحث Dim ws As Worksheet, i As Long, i2 As Long بالتوفيق -
رسالة Run-time error 9 subscript out of range
أ / محمد صالح replied to Alaaq3's topic in منتدى الاكسيل Excel
يمكنك استعمال هذه الأكواد في النموذج Private Sub ComboBox1_Change() Sheet1.Range("a1").CurrentRegion.AutoFilter Field:=4, Criteria1:=ComboBox1.Value End Sub Private Sub ComboBox2_Change() Sheet1.Range("a1").CurrentRegion.AutoFilter Field:=5, Criteria1:=ComboBox2.Value End Sub Private Sub ComboBox3_Change() Sheet1.Range("a1").CurrentRegion.AutoFilter Field:=6, Criteria1:=ComboBox3.Value End Sub Private Sub CommandButton1_Click() ComboBox1.Value = "" ComboBox2.Value = "" ComboBox3.Value = "" Sheet1.Range("a1").CurrentRegion.AutoFilter End Sub Private Sub UserForm_Initialize() Me.ComboBox1.List = Array("معلم", "مهندس", "فني", "مدير", "مهندس اقدم", "محامي") For n = 1 To 12 Me.ComboBox2.AddItem n Next n For n = 2003 To 2022 Me.ComboBox3.AddItem n Next n End Sub لاحظ طرق تعبئة combobox واستعمال currentregion بالتوفيق -
يمكنك استعمال هذه الأكواد كود تصدير الاستعلام إلى اكسل في نفس مجلد البرنامج DoCmd.OutputTo acOutputQuery, "QueryName", acFormatXLSX, CurrentProject.Path & "\ExcelFileName.xlsx", False مع مراعاة تغيير اسم الاستعلام queryname واسم ملف الاكسل excelfilename كود الاستيراد من اكسل إلى جدول DoCmd.TransferSpreadsheet acImport, 8, "TableName", CurrentProject.Path & "\ExcelFileName.xlsx", True مع مراعاة تغيير اسم الجدول وملف الاكسل ومراعاة تطابق أسماء الأعمدة (وليست التسمية caption) في الجدول مع خلايا الصف الأول في ملف الاكسل وطبعا عدم تكرار قيم حقل المفتاح الأساسي ومعرفة أن الأعمدة التي لم يتم استيرادها ستكون فارغة بالتوفيق
-
أشعر بشيء من عدم ترتيب الأفكار مادام الأمر به انتقاء لبعض الأعمدة لتصديرها وبعض الأعمدة لا تصدر فيجب إنشاء استعلام ثم تصدير هذا الاستعلام ماذا عن البيانات الموجودة في الجدول . هل يتم حذفها أم الإضافة عليها وتكرار السجلات وإذا تم حذفها ماذا عن الأعمدة التي لم يتم تصديرها. هل تظل فارغة بدون بيانات ؟ رجاء توضيح المطلوب بكل تفاصيله وأهدافه
-
نعم هناك طرق كثيرة واختيار أحدها من خلال رؤية ملفك واحتياجاته
-
كود تغير شكل ايقونة الاكسل علي ويندوز 64_bit
أ / محمد صالح replied to Saadrafic's topic in منتدى الاكسيل Excel
إذا لم يفدك ردي السابق المختصر ربما يفيدك هذا الموضوع بالتوفيق -
قيمة خلية تعتمد على محتويات خلايا اخرى
أ / محمد صالح replied to ابو طيبه's topic in منتدى الاكسيل Excel
هل تعني أن شرط + و yes ينطبق أيضا على E13 & E14؟ إذا كان هذا هو المطلوب فيمكن تغيير Elseif إلى End If If تم تحديث الكود السابق