Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / управление базой данных через excel / 18 сообщений из 18, страница 1 из 1
20.12.2010, 16:06
    #37025020
Ruslan999
Ruslan999
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Привет Всем. Мне нужно написать макрос в excel для управления базой данных access (добавление, удаление, обновление записей). Может кто-нибудь поможет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.12.2010, 16:11
    #37025037
PlanB
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
юзайте поиск по фразе вроде "основные действия с mdb"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.12.2010, 16:18
    #37027542
Ruslan999
Ruslan999
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Вот что я сделал:
http://depositfiles.com/files/5hduo0iu1

там 3 строки для добавления и кнопка. вводишь значения в эти 3 столбца (snum,sname,city) snum надо вводить цифру а в sname и city слово.
нажимаешь кнопку и он добавляет в базу значения. А вот как сделать чтобы он сразу все добавил в базу. Например значения в диапазоне E30:G44 .я думаю тут какой-то цикл нужен. нужно еще сделать так чтобы он понял что в следующей строке нет значений .
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.12.2010, 16:22
    #37027554
Shamanus
Shamanus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Ruslan999,

депозит закрыт с работы
кладите проект сюда
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.12.2010, 16:33
    #37027616
Ruslan999
Ruslan999
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
http://narod.ru/disk/1844887001/access.rar.html
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.12.2010, 16:34
    #37027626
Ruslan999
Ruslan999
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
http://narod.ru/disk/1844957001/access.rar.html
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.12.2010, 16:39
    #37027655
Ruslan999
Ruslan999
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
http://narod.ru/disk/1845293001/111.rar.html
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.12.2010, 16:44
    #37027674
Shamanus
Shamanus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Ruslan999,

ну так у Вас готовый проект, в чем проблема организовать цикл по ячейкам?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.12.2010, 16:53
    #37027705
Ruslan999
Ruslan999
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
ну там трудновато с циклом . может поможете.. и еще надо определить есть ли значения в следущей строке
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.12.2010, 17:12
    #37027761
Shamanus
Shamanus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Ruslan999,

ADO легковато for to next и if then else трудновато? Вы прям как Энштейн, который считал, что использовать 2 сорта мыла для разных целей слишком усложняет жизнь.

вот Вам статейки, учите
For ... to ... next
if ... then ... else ... end if
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.12.2010, 22:22
    #37035541
Ruslan999
Ruslan999
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
написал вот такой цикл

Public Sub ww()
Dim i As Integer
Dim t As String
i = 1
Do While i < 3
MsgBox (["A"&1])
i = i + 1
Loop
End Sub

че-то он выводит A1 а не значение в ячейке А1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.12.2010, 22:32
    #37035548
Ruslan999
Ruslan999
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Public Sub ww()
Dim i As Integer
Dim t As String
i = 1
Do While i < 3
t = "A" & i
MsgBox ([t])
i = i + 1
Loop
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.12.2010, 09:12
    #37036519
Shamanus
Shamanus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Ruslan999написал вот такой цикл

Public Sub ww()
Dim i As Integer
Dim t As String
i = 1
Do While i < 3
MsgBox (["A"&1])
i = i + 1
Loop
End Sub

че-то он выводит A1 а не значение в ячейке А1

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Public Sub ww()
Dim i As Integer
For i= 1  to  3 
  MsgBox cells( 1 , 1 )  ' эта строка равнозначна
  MsgBox Range("A1").Value ' этой строке  
next i
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2010, 17:06
    #37041324
Lockpickup
Lockpickup
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Для работы с БД есть специльные объекты: ADO и ADODB.
Чтобы с ними работать нужно подключить соответствующие библиотеки через References.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Dim Virtual_DB As ADODB.Connection

    '*************************************** _
    ПОДКЛЮЧЕНИЕ ВИРТУАЛЬНОЙ БАЗЫ ДАННЫХ
    Set Virtual_DB = New ADODB.Connection
    Virtual_DB.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    "Data Source=" & путь_к_МДБ_файлу, "Admin", , adConnectUnspecified
    '***************************************

F1 ADO и ADODB в Access или MSDN
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.12.2010, 18:08
    #37041481
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
LockpickupДля работы с БД есть специльные объекты: ADO и ADODB.Ну разве что "специльные".
Открывай букварь и читай чем объект отличается от интерфейса. А если еще сможешь рассказать чем ADO отличается от ADODB то совсем молодцом будешь.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.12.2010, 09:50
    #37042057
Shamanus
Shamanus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
White OwlLockpickupДля работы с БД есть специльные объекты: ADO и ADODB.Ну разве что "специльные".
Открывай букварь и читай чем объект отличается от интерфейса. А если еще сможешь рассказать чем ADO отличается от ADODB то совсем молодцом будешь.
если мне не изменяет память адодб это конкретная библиотека, для работы с адо, в то время как адо это интерфейс
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.12.2010, 18:29
    #37043037
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Shamanus, Не подсказывай.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.01.2011, 01:47
    #37044269
kuklp
kuklp
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
управление базой данных через excel
Shamanus, "если мне не изменяет память адодб это конкретная библиотека, для работы с адо, в то время как адо это интерфейс". Изменяет. RDO, DAO, ADO, ADODB, все это обьекты доступа к данным(то есть можно вполне назвать их и интерфейсами), разрабатывавшиеся один за другим в порядке перечисления. Так, ADODB не требует наличия ADO и т. д. в порядке убывания.

С уважением, Сергей.
П.С.
С Новым годом!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / управление базой данных через excel / 18 сообщений из 18, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 502ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2177297]:
 0ms
get settings:
 5ms
get forum list:
 20ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 184ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 34ms
get tp. blocked users:
 1ms
others: 239ms
total:  502ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]