@hp079 בטח, לא יודע למה סתם סיבכתי מקודם..
function getContactsForGroup() {
let name = `a`
let people = People.ContactGroups.list();
let groupName = people['contactGroups'].find((group) => group['name'] === name);
let resourceName = groupName.resourceName;
let idGroup = resourceName.split('/').pop();
let group = People.ContactGroups.get(`contactGroups/${idGroup}`, {
maxMembers: 200
});
Logger.log("group: " + group);
let group_contacts = People.People.getBatchGet({
resourceNames: group.memberResourceNames,
personFields: "emailAddresses"
});
let emails = group_contacts.responses.map(x => {
let emailObjects = x.person.emailAddresses;
if (emailObjects != null) {
return emailObjects.map(eo => eo.value);
}
});
Logger.log(emails)
}
את a בשורה 2 עליך להחליף בשם התווית.
@hp079 לפי הדוגמא שלך זה הקוד שאתה צריך
Private Sub פקודה16_Click()
Dim DynamicCondition As New Collection
If Not IsNull(ts_active) Then DynamicCondition.Add "פעיל=" & ts_active
If Not IsNull(ts_conected) Then DynamicCondition.Add "מחובר=" & ts_active
If Len(txt_sug) > 0 Then DynamicCondition.Add "סוג='" & CStr(txt_sug) & "'"
If Len(txt_name) > 0 Then DynamicCondition.Add "שם='" & CStr(txt_name) & "'"
DoCmd.OpenReport "דוח1", acViewPreview, WhereCondition:=JoinCollection(DynamicCondition, " AND ")
End Sub
Function JoinCollection(col As Collection, operator As String)
Dim result As String
For i = 1 To col.Count
If i <> 1 Then result = result & operator & " "
result = result & "(" & col(i) & ") "
Next
JoinCollection = result
End Function
הקרדיט כמובן ל @dovid ו @OdedDvir
@hp079
א. אתה יכול להשתמש בכוכבית ככה: "חורף*" והכוונה היא שזה מתחיל בחורף.
ב. לעטוף בSUM, ובSUMIF לתת מערך להתאמה:
=SUM(SUMIF(B2:B7, {"חורף","חורף+קיץ"},A2:A7))
מקור ושיטות נוספות, תוצאה ראשונה בחיפוש גוגל של SUMIF OR.
@dovid תודה
באמת אריכות דבריי לא מובנת למי שלא נכנס לתוך ראשי ומבין במה התקישיתי
התקשיתי גם איך נכנסים המחרוזות הריקות לפלט, וגם כי התבלבלתי איך באמת אמור להיות ההתנהגות כאשר יש התאמה למחרוזת ריקה, למשל אם זה בתחילת הקלט, האם מכניסים את המרוזת הריקה שלפני ההתאמה? האם מתקדמים עוד תו אחרי ההתאמה? ולמה? וכו'
מכיון שההשראה להסתבכות היו דברי חגי אז כתבתי כל הנ"ל בתשובה לדברי חגי, אבל באמת לא הכל קשור
@yossiz אמר בחילוץ טקסט מתשובת json:
אגב, האם אתה בטוח שאתה קורא ל-API הנכון? כי קיבלת רק מובאה מתוך הדף ולא כל התוכן. וגם זה בלי עיצוב כלל
זה בסדר, אני הורדתי חלק כדי שלא יהיה סתם גדול כאן בפורום.
@aknvtchtk אמר במה קרה למחשב שלי? הוא לא פותח שום תוכנה!:
@hp079 ברוך ה'
עכשיו רק נותר להבין כמו שאמרת
ולמשיך לעבוד... (הייתי באמצע פיתוח יישום עסקי בפאוואר אפס).
@לחיל-אומר אמר בעזרה דחופה בהפעלת גלקסי יאנג כשר:
ד. האם זה אמור להיות כלול באחריות.
כל סיבה שגורמת למכשיר לא לעבוד כיאות כלולה באחריות. [אא"כ זה נפל וקיבל מכה או התרטב]
@ליבל אמר בבניית ישום על אקסס:
@מלא יש לך משהו על VBA ? חיפשתי המון ולא מצאתי
זה גניבה לאור היום
נושא חדש אשכול חדש
@dovid אולי צריך להוסיף בחוקי הפורום התייחסות להסטת אשכולות, שיהיה 'חוק'
נ. ב.
בעבר ראיתי כמה מדריכים ישנים אבל אני לא מוצא אותם עכשיו.
נ. ב.2
אולי במקום להשקיע במכונית ישנה, תכניס את האנרגיה במשהו מתקדם?
אם תתעקש על VBA, תפתח נושא על הנושא והחברה יתנו לך הדרכות.