- Felháborodott az Apple, a Meta az iPhone-felhasználók üzeneteit akarja olvasni
- A luxusmárkáknak kell a bitcoin, az USA jegybankjának nem
- Letiltja az USA a politikusokat a telefonhívásokról és szöveges üzenetekről
- Nagy áttörés jön a napelemek piacán, nem kell annyi hely a paneleknek
- Belenyúlt az USA az Epic Games igazgatótanácsába, nyomoz az NVIDIA
-
IT café
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Fferi50
Topikgazda
válasz zoombiee #50774 üzenetére
Szia!
Ezt próbáltad már:
Beállítások Adatvédelmi központ - Az adatvédelmi központ beállításai - Makróbeállítások - Az összes makró engedélyezése
Másrészt nézd meg a VBA nézetben a Tools - References menüben, hogy be vannak e pipálva a szükséges könyvtárak, legalább ezek:
(Egyáltalán, makróbarátként (vagy binárisként) van mentve a fájl?)
Üdv. -
TillaT
tag
válasz zoombiee #50595 üzenetére
Szia!
- Köszönöm a javaslatot. Ezzel már próbálkoztam. Reméltem, hogy az OptionButton és CheckBox elemekhez is lehet saját zoom tulajdonságot rendelni, amivel az űrlap zoom tulajdonságától függetlenül egyénileg is állít(gat)hatók, de sajnos makróban is csak olyan lehetőségeket ismerek, amik nekem nem hozzák, amit szeretnék.
- Igen, a láthatóság lenne a lényeg.
Ezeknek a vezérlőknek a Caption tulajdonságát korrekten lehet változtatni és testre szabni, de a grafikájukat nem. Legalábbis az én ismereteim korlátozottak ezen a téren (is). Trükköznöm kell így egy kicsit velük.[ Szerkesztve ]
-
Pakliman
tag
válasz zoombiee #48814 üzenetére
Szia!
Egy "lista összevonási" lehetőség:
Munka1 munkalap A oszlopban értékek
Munka2 munkalap A oszlopban értékek
Munka3 munkalap az "összesítő":
A1 -> =DARABTELI(Munka1!A:A;"<>")-1 Munka1-en az értékek száma
B1 -> =DARABTELI(Munka2!A:A;"<>")-1 Munka2-n az értékek száma
C2-től -> =HA(SOR()-1<=$A$1;Munka1!A2;HA((SOR()-1)-$A$1<=$B$1;INDIREKT("Munka2!" & CÍM((SOR()-$A$1);1;;1));""))Az A1-ben és B1-ben lévő képletek beépíthetők a C2-be.
-
félisten
válasz zoombiee #48814 üzenetére
Olyan legördülő lista kellene, amiben több oszlop van, szóval pl. ilyen?
Ha az adatoknak mindenképpen külön munkalapon kell lenniük, akkor kell hozzá makró, ha megoldható, hogy egy munkalapra kerüljenek az adatoszlopok/tartományok(mint a képen), akkor makró sem kell feltétlenül."Ezzel az a gond, hogy mindkét oszlop bővül, ha az első után kihagyok x sort, akkor egy idő után mindig el kell csúsztatnom a 2. munkalap hivatkozásait"
Ezt sajnos nem értem... Ha a 2 oszlopban/tartományban nem azonos számú kitöltött cella van, akkor a legördülő listának nincs értelme...Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Fferi50
Topikgazda
válasz zoombiee #47049 üzenetére
Szia!
Az a probléma, hogy a szövegben levő idézőjelek megszakítják a szöveget, az utána következő részt (és az előtte levőt is persze) nem tudja értelmezni.
Ha idézőjeleket szeretnél a szövegben elhelyezni, akkor meg kell duplázni azokat:"ThisWorkbook.Sheets(""Munka1"").Range(""K5"") = 5"
minden olyan helyen, ahol idézőjelet akarsz.
Üdv. -
Mutt
senior tag
válasz zoombiee #44797 üzenetére
Szia,
Látom Bobrooney már küldött jó megoldást.
Google Sheets App Script-et használ, a megadott VBA kódod ennek felel ott meg:
function CommandButton1_Click() {
var sheet = SpreadsheetApp;
var teszt1 = sheet.getActiveSpreadsheet().getSheetByName("Teszt1");
var teszt2 = sheet.getActiveSpreadsheet().getSheetByName("Teszt2");
var start_x = teszt1.getRange("C17").getValue();
var start_y = teszt1.getRange("D17").getValue();
teszt2.getRange(start_x, 3).setValue(start_y);
};Gombot pedig rajzolással tudsz létrehozni.
üdv
[ Szerkesztve ]
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
Bobrooney
senior tag
válasz zoombiee #44797 üzenetére
function myFunction() {
var app = SpreadsheetApp;
var activeSheet = app.getActiveSpreadsheet().getSheetByName("Teszt1");
var Start_X = activeSheet.getRange("C17").getValue();
var Start_Y = activeSheet.getRange("D17").getValue();
var targetSheet = app.getActiveSpreadsheet().getSheetByName("Teszt2");
targetSheet.getRange(Start_X , 3).setValue(Start_Y);
}
-
Fferi50
Topikgazda
válasz zoombiee #44162 üzenetére
Szia!
Nézd meg az Application.OnKey parancs lehetőséget. Itt elfogadja az ékezetes karaktereket is. Nem kell mást tenned, mint a munkafüzet megnyitásakor futtatni a billentyűzet hozzárendeléseket, bezáráskor pedig azok megszüntetését.
Pl Application.OnKey "é", "Makró1"
az é billentyű lenyomásakor futtatja a Makró1-t.
Érdemes a parancs helpjét megnézegetni kicsit: [itt]
Üdv.
Új hozzászólás Aktív témák
- AKCIÓ! Microsoft szoftverek, vírusírtó szoftverek, egyéb szoftverek széles választéka!
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Újévi kedvező ár!
- Indiana Jones and the Great Circle - Digital Premium Edition - beváltás: 2025.1.30 - RTX 40XX
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest