کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

به اشتراک گذاری اطلاعات کسب شده در اکسس از سایت آفیس و سایت های تخصصی خارجی
کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

به اشتراک گذاری اطلاعات کسب شده در اکسس از سایت آفیس و سایت های تخصصی خارجی

عناوین یادداشت‌ها

  • تابع CDbl برای تبدیل عبارت به دیتا تایپ عددی Double یکشنبه 21 آبان 1402 18:05
    تابعی که یک عبارت را به ( Double ( Number تغییر می دهد نوشتاری : CDbl ( expression ) در زیر به مقدار پوینت هایی که می تواند این دیتا تایپ در مقادیر منفی و مثبت ذخیره کند اشاره شده The Double data type stores precision floating point numbers from -1.79769313486232E 308 to -4.94065645841247E- 324 for negative values or...
  • تابع Nz یا Null Zero یکشنبه 21 آبان 1402 17:36
    تابع Nz برای عباراتی مفید است که می تواند حاوی مقادیر Null ( منظور بدون هیچ داده ای ) باشد. برای اجبار کردن یک عبارت برای ارزیابی به یک مقدار غیر Null حتی زمانیکه حاوی یک مقدار Null است از این تابع برای دادن بازگشتی تابع به صفر ، یک رشته با طول صفر یا یک مقدار بازگشتی سفارشی استفاده کنید برای مثال عبارت VarX+2 زمانیکه...
  • فیلتر بین دو تاریخ در پرس و جوی اکسس شنبه 20 آبان 1402 18:46
    در تصویر زیر فرمی است که دو تکست باکس در آن قرار دارد و بر اساس پر شدن آنها در صورت موجود بودن در جدول ، اطلاعات ( بازه بین دو باکس ) نمایش داده می شود. اگر یکی از باکس ها یا هر دوی آنها خالی باشند نتیجه نمایش تمام اطلاعات موجود در جدول خواهد بود. پرس و جو با باکس های داده تهی : برای انجام ، دو فیلد در پرس و جو اضافه...
  • تصویر بهمراه متن در کامند باتن چهارشنبه 17 آبان 1402 23:02
    ویژگی ترتیب کپشن و تصویر در کامند باتن CommandButton.PictureCaptionArrangement property acBottom The caption appears below the picture. acGeneral The caption uses the General alignment setting acLeft The caption appears to the left of the picture acNoPictureCaption The caption is not displayed acRight The caption...
  • چاپ تکست X در سل های A5,B4,C3,D2,E1 چهارشنبه 17 آبان 1402 12:54
    Sub x() Dim i As Long For i = 1 To 5 Cells(6 - i, i).Value = "x" Next i End Sub ۶-۱,۱ ' ردیف ۵ و ستون ۱ ۶-۲,۲ ۶-۳,۳
  • نوشتن فایل متنی ( از درون اکسل ) چهارشنبه 17 آبان 1402 12:26
    در کد زیر نوشتن روی یک تکست فایل نمایش داده شده .iLastRow و iLastCol متغیرهایی هستند که به ترتیب شماره آخرین ردیف ( No Blank ) و آخرین ستون ( No Blank ) را در خود ذخیره می کنند. از عبارت Open و حالت OutPut برای باز کردن فایل FundPrices استفاده شده و در داخل لوپ هایی محتویات داخل سلول ها طبق آدرس ردیف و ستون مورد نظر...
  • متد Docmd.Findrecord و شئ Screen سه‌شنبه 16 آبان 1402 14:44
    این متد عمل FindRecord در ویژوال بیسیک را انجام می دهد نوشتاری : expression . FindRecord ( FindWhat , Match , MatchCase , Search , SearchAsFormatted , OnlyCurrentField , FindFirst ) -FindWhat : متن مورد جستجو [ اجباری ] -Match : ( آرگومان اختیاری) ثابت AcFindMatch جایی که برای انطباق جستجو می شود را مشخص می نماید ....
  • تابع ChooseFont یکشنبه 14 آبان 1402 17:15
    تابع ChooseFont : یک کادر محاوره ای فونت ایجاد می کند که به کاربر امکان می دهد ویژگیهای یک فونت منطقی را انتخاب کند. این ویژگیها شامل یک خانواده فونت و سبک فونت مرتبط ، اندازه نقطه ، جلوه ها ( زیر خط ، خط روی کاراکتر و رنگ متن ) یک اسکریپت ( یا مجموعه کاراکتر ) است . Boolean : ChooseFont(lpcf) lpcf : نشانگری به ساختار...
  • حمله به غزه سه‌شنبه 9 آبان 1402 14:13
    impressed me a lot cease killing ترسم که جان شیرین هجران به لب رساند تا وقت آن که باشد ما را به هم رسیدن موقوف التفاتم تا کی رسد اجازت از دوست یک اشارت از ما به سر دویدن مرگ بر اسرائیل : کلمه « اسرائیل » 43 بار در قرآن مجید ذکر شده که 41 بار آن به لفظ بنی اسرائیل می باشد . این کلمه ترکیب شده از « اسراء » که در زبان...
  • تابع IIF در اکسس جمعه 5 آبان 1402 12:18
    =IIF( Condition , Value If True , Value If False ) برای مثال =IIF( State="NY" , "Yes" , "No" ) تابع IIF کلمه Yes را باز خواهد گرداند اگر فیلد State برای NY باشد. =IIF( State="NY" , 0.875 , 0 ) اگر State برابر NY باشد نرخ مالیات ۸.۷۵ درصد است در غیر اینصورت صفر. اگر بخواهید از...
  • Dlookup در اکسس جمعه 5 آبان 1402 11:25
    در کد های زیر از چندین تابع و متد استفاده شده ابتدا چک میکند درصورت Null بودن نام کاربری ( username ) در جدول tbl_registration ورودی هایی را برای ارسال و درج در فیلدهای این جدول مثل fname یا password دریافت می کند. If (IsNull(DLookup ("username", "tbl_registration", "username=""...
  • تغییر رنگ فونت و رنگ داخل محدوده انتخابی چهارشنبه 3 آبان 1402 18:51
    عراق
  • مخفی کردن کالمن یا ستون در اکسل سه‌شنبه 2 آبان 1402 21:48
    'Hide Columns Columns("B:C").EntireColumn.Hidden = True 'Unhide Columns Columns("B:C").EntireColumn.Hidden = False
  • متد Selection.Copy و پراپرتی CutCopyMode سه‌شنبه 2 آبان 1402 21:32
    lRow=Selection.Row() Rows(lRow).Select متد Selection.Copy : کپی کردن انتخاب مشخص شده به کلیپ بورد پراپرتی Application.CutCopyMode : تنظیم یا بازیابی عنوان حالت Cut یا Copy . می تواند True یا False باشد ، یا ثابت XLCutCopyMode
  • شمارش سلول های خالی در اکسل و هایلایت کردن شنبه 29 مهر 1402 21:43
    تابع CountBlank تعداد سل های خالی رنج مشخص شده را بر می گرداند =Or(Row()=.....,Column()=...)
  • دو رویداد SelectionChange و BeforeDoubleClick در شیت اکسل شنبه 29 مهر 1402 19:53
    دوم آبانماه ۱۴۰۲ به گزارش خبرنگار اعزامی فارس از چین، با اعتراض چین و بررسی اتفاقی که در ماده F56 پرتاب نیزه بانوان افتاد، کمیته برگزاری بازی‌های پاراآسیایی هانگ‌ژو، مدال طلا و نقره هاشمیه متقیان و زینب مرادی را پس گرفت . کد های زیر در رویداد SelectionChange نوشته شده با جابجا شدن روی سل ها ، رنگ کل ستون و ردیف...
  • تغییر رنگ سلول مجاور شنبه 29 مهر 1402 13:08
    در مثال زیر با تغییر عدد مربوط در هر کدام از سل های درون ستون A رنگ سلول ستون مجاور یعنی B و همان ردیف به رنگ قرمز در می آید. کد در رویداد Change برگه کاری یا شیت فعلی که در آن هستید نوشته شده Private Sub Worksheet_Change(ByVal Target As Excel.Range) اگر در کالمن ( ستون یک) A باشد If Target.Column = 1 Then شماره ردیف...
  • ایجاد ردیف بین دو ردیف با تغییر مقدار شنبه 29 مهر 1402 12:52
    X=Target.Row Y=Target.Column Msgboc X & "," & Y در کد زیر اگر مقدار در ستون C و سل مربوطه با ردیف قبلش تفاوت داشت یک ردیف ایجاد می کند بخاطر تفکیک کردن.البته در رویداد Selection Change هم می توان کد داخل رویه زیر را کپی کرد و محدوده را هم اصلاح نُمود. Sub InsertRows() Dim lastRow As Long Dim rowPtr...
  • AutoFilter در اکسل و جمع ستون جمعه 28 مهر 1402 12:30
    در تصویر اول از عملگر Or در ستون ۷ یا Owner استفاده نُموده و همانطور که می بینید Ben و John در حالت انتخاب قرار گرفته اند. در تصویر دوم فیلتر در دو ستون ۷ و ۹ صورت گرفته انجام فیلتر در Vba معمولا در گزارشات می تواند موثر باشد که با کدهایی که داده میشه آیتم (هایی) فیلتر شود(ند) و کانت یا جمع آن در شیت یا ورک بوک (...
  • گرفتن مقدارفعلی گزینه های انتخاب در دایالوگ باکس Options پنج‌شنبه 27 مهر 1402 14:40
    متد GetOption مقدار فعلی یک انتخاب در باکس Options را برمی گرداند (فرضا تیک خورده یا نخورده-انتخاب شده یا نشده ).اگر روی دکمه Options در سمت چپ و بالای پنجره اکسس کلیک کنید پنجره ای باز میشود که حاوی تنظیم هایی است فرضا رفتار Enter که به فیلد بعد برود یا رکورد بعدی. متدهای GetOption و SetOption وسیله ای برای تغییر...
  • RunCommand برای اجرای دستورات داخلی پنج‌شنبه 27 مهر 1402 13:17
    یک دستور داخلی را اجرا می کند فرضا باز کردن دایالوگ باکس Options Public Sub OpenDialogBoxOptions( RunCommand acOptions End Sub هر کدوم از این عملکردها یه مقدار ثابتی در اکسس دارد که در زیر بعضی از آنها آورده شده و می توانید به داکیومنت آفیس برای مشاهده دستورات دیگر مراجعه نُمائید. انجام ماکزیمم ، مینیمم و به حالت اول...
  • متد انتخاب آبجکت ( شئ باز ) در اکسس و مخفی کردن آنها پنج‌شنبه 27 مهر 1402 12:46
    این متد شئ مورد نظر در پنجره اکسس را انتخاب می کند دیفالت آرگومان سوم در صورت انتخاب نشدن False یا عدد صفر و انتخابی یا Optional است. آرگومان اول نوع آبجکت را مشخص می کند مثل acTable ( نشاندهنده جدول ) این متد Docmd.SelectObject ، عمل یا اکشن SelectObject در ویژوال بیسیک است. در کد زیر فرم Customers انتخاب شده است (...
  • تئوری پنهان کردن پنجره اصلی اکسس یکشنبه 23 مهر 1402 18:51
    ماده ۱۴- ایجاد نقاط امن ویرایش ‌ماده ۱۴- دولت‌های متعاهد در زمان صلح و دولت‌های متخاصم پس از شروع جنگ می‌توانند در خاک خود و در صورت لزوم در اراضی اشغالی، نواحی و نقاط‌ بهداری و امنیت ایجاد کرده و تشکیلات آن را طوری بدهند که زخمداران و بیماران و معلولین و پیران و اطفال کمتر از ۱۵ سال و زنان‌ باردار و مادران اطفال‌...
  • متد GetPressedMso و ExecuteMso یکشنبه 23 مهر 1402 15:27
    مقداری را برمی گرداند که نشان می دهد آیا کنترل toggleButton شناسایی شده توسط پارامتر idMso فشرده شده است یا خیر. متد ExecuteMso کنترل شناسایی شده توسط پارامتر idMso را اجرا می کند. expression. ExecuteMso "MinimizeRibbon"
  • IsZoomed ، IsIconic و IsWindowVisible از توابع Api ویندوزی ( چک کردن حالت نمایش پنجره ) یکشنبه 23 مهر 1402 14:21
    -برداشت شده از داکیومنت سایت Office برای سیستم ۳۲ یا ۶۴ بیت IsZoomed : آیا یک پنجره در حالت حداکثر سایز است ؟ Determines whether a window is maximized. IsIconic : آیا پنجره تعیین شده در حالت حداقل اندازه است ( دیدن فقط آیکون های پنجره) ؟ Determines whether the specified window is minimized (iconic). #If VBA7 Then...
  • ویژگی StartupShowDBWindow جمعه 21 مهر 1402 21:26
    برای تعیین اینکه آیا پنجره پایگاه داده زمانیکه برنامه باز میشود نمایش داده شود یا خیر از این ویژگی استفاده می شود.بعنوان مثال ، زمانیکه برنامه پایگاه داده باز می شود ، می توانید یک فرم اصلی را باز کنید و پنجره پایگاه داده را پنهان کنید. می توانید این ویژگی را برای پنهان کردن پنجره پایگاه داده به False تنظیم نُمائید...
  • ویژگی TabStop و TabIndex جمعه 21 مهر 1402 16:49
    استفاده از ویژگی برای تعیین اینکه می توان از کلید Tab برای انتقال فوکس به یک کنترل استفاده کرد یا خیر ، نوع Boolean بصورت خواندنی و نوشتنی زمان ساخته شدن یک کنترل روی یک فرم ، مایکروسافت اکسس بصورت خودکار به کنترل یک موقعیتی را در Tab Order فرم اختصاص می دهد. هر کنترل جدید در آخر Tab Order ( برگه چیدمان کنترل ها )...
  • TabbedTextOutW جمعه 21 مهر 1402 16:24
    ا گر پارامتر nTabPositions صفر و پارامتر lpnTabStopPositions نال باشد تب ها به هشت برابر میانگین عرض کاراکترگسترش می یابند. اگر nTabPositions یک در نظر گرفته شود ، tab stop ها با فاصله مشخص شده توسط مقدار اول در آرایه lpnTabStopPositions از هم جدا می شوند. اگر آرایه lpnTabStopPositions حاوی بیش از یک مقدار باشد ، یک...
  • MessageBoxTimeoutW سه‌شنبه 18 مهر 1402 21:50
    Undocument ... User32.Dll MB_YESNOCANCEL=&H3 MB_YESNO=&H4 MB_RETRYCANCEL=&H5 MB_OKCANCEL=&H1 MB_OK=&H0 MB_ICONEXCLAMATION=&H30 MB_ICONHAND=&H10 MB_DEFBUTTON1=&H0 MB_DEFBUTTON2=&H100 MB_RIGHT=&H80000 MB_RTLREADING=&H100000 MB_TOPMOST=&H40000 IDOK=1 IDCANCEL=2 IDYES=6...
  • WS_CAPTION سه‌شنبه 18 مهر 1402 21:11
    پنجره ، نوار عنوان یا title bar دارد ( شامل مد WS_BORDER WS_CAPTION As Long = &HC00000 WS_MAXIMIZE As Long = &H1000000 WS_MAXIMIZEBOX As Long = &H10000 WS_MINIMIZE As Long = &H20000000 WS_MINIMIZEBOX As Long = &H20000 WS_SYSMENU As Long = &H80000 WS_POPUP As Long = &H80000000...