vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest niedziela, 12 maja 2024 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

Wiersze i kolumny z Excela w VBA


otwartyotwarty rozpoczął: bjj postów: 6



napisał: bjj
postów: 7


umieszczony:
29 marca 2005
14:00

  
Acha jeszcze inne pytanie mam.
Czy jest możliwość NIE uruchomienia pliku excela który ma makra jeżeli użytkownik podczas uruchamiania nie zgodzi się na włączenie tych makr??

pzdr
napisał: bjj
postów: 7


umieszczony:
29 marca 2005
13:54

  
Dzięki bardzo!!
2 pytanie już nie ważne :D

pzdr
napisał: admin
postów: 613


umieszczony:
28 marca 2005
11:58

  
Cytat:

Nie wiem kompletnie jak wybrać komórkę która się znajduje w aktualnym wierszu (czyli nr wiersza bez zmian), ale w konkretniej kolumnie np. 6 czyli "F".

I jeszcze- czy jest możliwość samym excelem wpisania do komórki np. B2 wartości ale przy użyciu innej komóki, czyli bez bezpośredniego wpisywania wartości do B2???

pzdr


1. Bardzo prosto:
i = ActiveCell.Row
Range("F" & i).Value = jakaś_tam_wartość



2. Nie wiem zbytnio o co chodzi... Spróbuj napisać jaśniej.
napisał: bjj
postów: 7


umieszczony:
28 marca 2005
09:26

  
Dzięki. Ale mam jeszcze jeden problem.

Nie wiem kompletnie jak wybrać komórkę która się znajduje w aktualnym wierszu (czyli nr wiersza bez zmian), ale w konkretniej kolumnie np. 6 czyli "F".

I jeszcze- czy jest możliwość samym excelem wpisania do komórki np. B2 wartości ale przy użyciu innej komóki, czyli bez bezpośredniego wpisywania wartości do B2???

pzdr
napisał: rikiti
postów: 1


umieszczony:
23 lutego 2005
01:02

  
Myślę, że może się przydać poniższy kod nie jest to dokładnie to czego oczekujesz ni mniej powinno pomóc

Trochę wycięty z kontekstu

'przejdź do zakładki
Sheets("Difference_%").Select
'Zaznacz komórkę A4
Range("A4").Select
'Zaznacz ostatnią komórkę w wierszu więkzą od 0
Selection.End(xlToRight).Select
' Zanzacz komórkę o 1 wyżej niż wcześniejsza
ActiveCell.Offset(-1, 0).Select
'Rozszerz zaznaczenie o 11 komórek w lewo
'(czyli łącznie zostanie zaznaczonych 12)
Range(Selection, Selection.Offset(0, -11)).Select
'Rozszerz zaznaczenie o wszystkie komórki większe od 0 w dół
Range(Selection, Selection.Offset(230, 0)).Select
'Range(Selection, Selection.End(xlDown)).Select
' Skopiuj cały obszar
Selection.Copy
'Przejdź do zakładki i komórki
Sheets("BFC 2004").Select
Range("BG5").Select
' Wklej specjalnie (format)
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone
Range("BG5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone

pozdr.
napisał: bjj
postów: 7


umieszczony:
17 lutego 2005
22:32

  
Mam taki problem.
Chcę zrobić makro które ma wstawiać wiersz w miejscu w ktorym właśnie znajduje się kursor, następnie ma skopiować cały wiersz (lub jakiś zakres komórek) który jest nad tym wstawionym i zawartość jego wkleić w ten wstawiony i wkleić w jeszcze jeden wiersz, który znajduje się pod tym wstawionym.

prosze o pomoc, z góry dziękuję

pzdr


<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z